напишите программу для записи четырехзначного числа в обратном порядке.Например:2451-->1542Паскаль.

var n,m: integer;
begin
  write('n = ');  readln(n);
  m:=0;
  repeat
    m:=m*10+(n mod 10);
    n:=n div 10;
  until n=0;
  writeln(m);
end.

n = 2456
6542