Дано трехзначное число. вывести число, полученное при прочтении исходного числа справа налево. через паскальАБС

Решение задачи:var a, x, y, z: integer;beginwrite(\'Введите трехзначное число: \');readln(a);x:=a div 100; //Выполнение целочисленного деления трехзначного числа на 100.y:=(a mod 100) div 10;//Нахождение остатка от деления введенного числа на 100 и затем вычисление целочисленного деления остатка на 10.z:=a-x*100-y*10;writeln(\'Ответ: \', z, y, x);end.