Дано трёхзначное число K. Вывести на экран число полученное при перестановке

Дано трёхзначное число K. Вывести на экран число приобретенное при перестановке первой и заключительней цифр.

Задать свой вопрос
1 ответ

var a, b, c, d:integer;

begin

readln(a);

d:=(a mod  10) *100;

c:= (a div 10 mod 10)*10;

b:= a div 100;

a:=d+c+b;

writeln(a);

end.


, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт