Информатика

Павлин

20 мая, 08:25

Ниже записана программа. Получив на вход число x, эта программа печатает два числа, L и M. Укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 7.

var x, L, M: integer;

begin

readln (x) ;

L:=0; M:=0;

while x > 0 do begin

L: = L + 1;

M: = M + x mod 10;

x: = x div 10;

end;

writeln (L) ; write (M) ;

end.