Question

Составьте программу решающую следующую задачу дано трехзначное число в нём зачеркнули первую цифру слева и приписали её справа вывести полученное число ввод 452 вывод 524

Answer 1

Ответ:

begin

var x:=ReadString('Введите число: ');

Println(x, ' --- ', x[2]+x[3]+x[1]);

end.

Как вариант)

Answer 2

===== PascalABC.NET =====

begin

 var n := ReadInteger;

 Print(10 * (n mod 100) + n div 100)

end.