Ниже записана программа. Получив на вход число, эта программа печатает два числа, и. Укажите наибольшее из таких чисел, при вводе которых алгоритм печатает сначала 3, а потом 7.
var x, L, M: longint;
begin
readln\(x\);
L:=0; M:=0;
while x > 0 do begin
L:=L+1;
if M < x then begin
M:=x mod 10;
end;
x:= x div 10;
end;
writeln\(L\); write\(M\);
end.