Задача по программированию 8 класс. Решите как положено через паскаль!! Дано трехзначное число. Найти число, полученное при перестановке первой и второй цифр заданного числа
Var a:integer; begin read(a); write((a div 10 mod 10)*100+(a div 100)*10+a mod 10) end.