Информатика Получив на вход число x, приведенная ниже программа выводит два числа - m и n. var x, m, n: integer;

begin

readln(x);

m:=0; n:=0;

while x>0 do

begin

if n m:=m+1;

x:=x div 10;

end;

writeln(m); write(n)

end.

Известно, что при некотором значении x были выведены числа 4 и 8. Укажите наибольшее и наименьшее из таких чисел x. Сколько всего существует таких x?

Dasha5901 Dasha5901    3   07.12.2020 12:11    23

Другие вопросы по теме Информатика