Информатика Задние
Получив на вход число х, приведённая ниже программа выводить два числа - m и n.

Известно, что при некотором значении х были выведены числа 4 и 8. Укажите наибольшее и наименьшее из таких чисел х. Сколько всего существует таких х?
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.

Динка105 Динка105    1   11.12.2020 17:10    19

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