Информатика

Получив на вход число x, приведенная ниже программа выводит два числа- m и n. var x, m, n: integer;beginreadln (x);m:=0; n:=0;while x>0 dobeginif n m:=m+1;x:=x div 10;end;writeln (m); writeln (n)end.Известно, что при некотором значении х были выведены числа 4 и 8. Укажите наибольшее и наименьшее из таких чисел х. Сколько всего существует таких х?