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