Дано двузначное число. Получить число, образованное при перестановки цифр заданного числа числа
Var a,b:integer; begin writeln('Введите число'); readln(a); b:=(a mod 10)*10+(a div 10); writeln('Ответ'); writeln(b); end.