(x, y, z) = (4, 1, 6), (4, 2, 7)
Объяснение:
Так как числа представлены в восьмеричной системе счисления, x, y, z ≤ 7. Более того, в числах с количеством цифр больше одной цифры в старшем разряде ненулевые, то есть x, y ≥ 1. Переведём все числа в десятичную систему счисления:
Правая часть делится на 4, значит, и левая делится на 4. Так как x ∈ [1; 7], x = 4. Тогда z - y = 5. Если y = 1, то z = 6; если y = 2, то z = 7. При больших y z ≥ 8, чего быть не может. Значит, получаем две тройки решений: (x, y, z) = (4, 1, 6), (4, 2, 7).
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-10,10); a.Println;
a.Sort; a.Println;
Writeln('Кол-во разных чисел равно ',a.Distinct.Count)
end.
Пример
n= 13
-1 1 3 -2 8 -9 9 -1 -8 -8 9 -9 2
-9 -9 -8 -8 -2 -1 -1 1 2 3 8 9 9
Кол-во разных чисел равно 9