Дано трехзначное число. В нем зачеркнули первую справа цифру и приписали ее слева. Вывести полученное число

Категория: Delphi/Pascal
2011-11-22 19:22:28
code: #pascal
Program Integer14;
var x,a,c,p:integer;
begin
Writeln('Введите число a');
readln(x);
a:=x div 10;
c:=x mod 10;
p:=c*100+a;
Writeln ('Перестановленное местами =',p);
end.

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

Поделиться:

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

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