Дано трехзначное число. В нем зачеркнули первую слева цифру и приписали ее справа. Вывести полученное число
Категория: Delphi/Pascal
2011-11-22 19:20:42
code: #pascal
Program Integer13; var x,a,b,c,p:integer; begin Writeln('Введите число a'); readln(x); a:=x div 100; c:=x mod 100; p:=c*10+a; Writeln ('Перестановленное местами =',p); end.
автор: Zakirov Nail a.k.a ZevsNet
Поделиться: