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

1

Ответы и объяснения

2014-02-25T14:07:01+04:00
Program Integer13; 
var x,a,b,c,p:integer; 
begin 
Writeln('Vvedite chislo '); 
readln(x); 
a:=x div 100; 
c:=x mod 100; 
p:=c*10+a; 
Writeln ('Result= ',p); 
readln; 
end.