Задание

Ниже приведён алгоритм. Укажите наименьшее из таких чисел , при вводе которых алгоритм печатает сначала 4, а потом 5.
var x, b, i: longint;
begin
readln\(x\);
b:= 0; i:=0;
while x > 0 do begin
if i mod 2 > 0 then b:= b + x mod 10;
x:= x div 10;
i:= i + 1;
end;
writeln\(i\);
writeln\(b\);
end.