Question

Задача по программированию 8 класс. Решите как положено через паскаль!!
Дано трехзначное число. Найти число, полученное при перестановке первой и второй цифр заданного числа

Answer 1

var a:integer;
begin
read(a);
write((a div 10 mod 10)*100+(a div 100)*10+a mod 10)
end.