Получив на вход число x, этот алгоритм печатает два числа a и b. Укажите наименьшее из таких чисел x,
при вводе которых алгоритм печатает сначала 3, а потом 12.
Текст:
program gg;
var x,a,b:integer;
begin
readLn(x);
a:=0; b:=0;
while (x>0) do
begin
a:=a+1;
b:=b+(x mod 10);
x:=x div 10;
end;
writeLn(a);
writeLn(b);
end.