Дано трёхзначное число.В нём зачеркнули последнюю справа цифру и приписали ее в начале.Найти полученное число.Например,284 получаеться число 428

Предыдущий
вопрос Следующий
вопрос

Число:

var x:integer; 

begin

 readln(x);

 x := (x mod 100) mod 10 * 100 + (x mod 100) div 10 * 10 + (x div 100);

 writeln(x);

end.

Строка:

var s:string[4];

begin

 readln(s);

 s[4]:=s[1];

 s[1]:=s[3];

 s[3]:=s[4];

 s[4]:=#0;

 writeln(s);

end.