Ниже на 5 языках программирования записан метод. Получив на вход натуральное

Ниже на 5 языках программирования записан метод. Получив на вход естественное число x, этот метод печатает число R. Укажите такое число x, при вводе которого метод печатает двузначное число, сумма цифр которого одинакова 13. Если таких чисел x несколько, укажите меньшее
из их.
var

x,d,R: longint;

begin

readln(x);

R := 0;

while xgt;0 do

begin

d := x mod 10;

R := 10*R + d;

x := x div 10

end;

writeln(R)

end.