Question

Дано двузначное число. Получить число, образованное при перестановки цифр заданного числа числа

Answer 1

Var a,b:integer;
begin
  writeln('Введите число');
  readln(a);
  b:=(a mod 10)*10+(a div 10);
  writeln('Ответ');
  writeln(b);
end.