Ввод числа алгоритма
Ниже записан алгоритм. Получив на вход число x, этот алгоритм печатает два числа a и b. Укажите наименьшее из таких чисел x, при вводе которого алгоритм печатает сначала 2, а потом 7.
var x, a, b: integer;
begin
readln(x);
a := 0; b := 1;
while x > 0 do
begin
a := a+1;
b := b*(x mod 100);
x := x div 100;
end;
writeln(a); write(b);
end.