Вывести число, полученное при перестановке цифр исходного числа

Категория: Delphi/Pascal
2011-11-20 23:40:21

Дано двузначное число.

code: #pascal
Program Integer8;
var a,r,l,p:integer;
begin
Writeln('Введите число a');
readln(a);
r:=a div 10;
l:=a mod 10;
p:=l*10+r;
Writeln ('Перестановленное местами =',p);
end.

автор: Zakerov Nail a.k.a ZevsNet

Поделиться:

Похожие статьи:

теги: студенты, консольное приложение, М.Э.Абрамян, перестановка цифр