1047₁₀ = 1024 + 16 + 4 + 2 + 1 = 1·2¹° + 0·2⁹ + 0·2⁸ + 0·2⁷ + 0·2⁶ + 0·2⁵ + 1·2⁴ + 0·2³ + 1·2² + 0·2¹ + 1·2⁰ = 10000010101₂
1047₁₀ = 1024 + 16 + 7 = 2·8³ + 0·8² + 2·8¹ + 7·8⁰ = 2027₈
1047₁₀ = 1024 + 16 + 7 = 4·16² + 1·16¹ + 7·16⁰ = 417₁₆
Это арифметическая прогрессия с начальным членом x и знаменателем y. Зная сумму членов (=N) можно найти количество
Шапка проги
writeln ('введите количество чисел');
readln (n);
y:=30000;
for i:=1 to n do
writeln ('введи число');
readln (x);
if x<y then y:=x;
writeln (x);
end.