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

Чтоб числа поменялись местами необходимо число единиц помножить на десять, а число 10-ов записать вместо единиц. Число единиц можно отыскать как остаток после дробленья на 10. Число 10-ов одинаково целой доли приватного после дробления на 10.

Пример: начальное число 43.

 43 mod 10 = 3;

(43 mod 10) * 10 = 3 * 10 = 30;

43 div 10 = 4;

30 + 4 = 34.

program change;

var n: integer;

begin

Writeln(Введите двузначное число);

readln(n);

writeln(Число после обмена цифр местами:)

writeln((n mod 10) * 10 + n div 10);

end.