Программирование, 8 класс. решите как положено: дано трехзначное число. найти число, полученное при прочтении его цифр справа налево

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