Дано трехзначное число. Найти число, полученное при прочтении его цифр справа налево. (123 321) (программа Паскаль)

Question

Дано трехзначное число. Найти число, полученное при прочтении его цифр справа налево. (123 321)

Answer 1

Program z8;
Var n, a1, a2, a3, n1: Integer;
Begin
Writeln (‘Введи число’);
Readln (n);
a1:= n div 100  ;
a2:= n div 10 mod 10;
a3:= n mod 10;
n1:= a3*100+ a2*10+a1;
Writeln (‘новое число’, n1);
Readln;
End