Укажите наибольшее из таких чисел x, при вводе которых алгоритм печатает сначала 2, а потом 9. 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); write(b) ; end.

Так как переменная "a" выведет два, то в данном случае можно сказать, что число двузначное.
Переменная "b" должна вывести 9. В программе берется остаток числа от деления на 10 и прибавляется переменная "b". Сумму "9" можно представить, как 9+0, 8+1, 7+2, 6+3, 5+4. Наибольшее число, которое можно составить из предложенных сумм - 90.

ответ: 90.