Дано четырехзначное число n. Выписать число в обратном порядке.
n- четырехзначное число (1762)- исходные данные
a,b,c,d - цифры этого числа( вспомогательные переменные).
m- обратное число(результат)
Решить через div и mod

var n,m,a,b,c,d:integer;beginwrite('n = ');readln(n);a:=n div 1000;b:=n div 100 mod 10;c:=n mod 100 div 10;d:=n mod 10;m:=d*1000+c*100+b*10+a;writeln('m = ',m);end.Пример:n = 1762m = 2671