Ниже записан метод. Получив на вход число x, этот метод

Ниже записан алгоритм. Получив на вход число x, этот метод печатает два числа a и b. Укажите набольшее пятизначное число x, при вводе которого метод печатает сначала 2, а потом 4.
var x, y, a, b: longint;
begin
a := 0;
b := 0;
readln(x);
while x gt; 0 do begin
y := x mod 10;
if y gt; 4 then a := a + 1;
if y lt; 7 then b := b + 1;
x := x div 10
end;
writeln(a);
writeln(b)
end.