Question

ПАСКАЛЬ Дано натуральное число n. Вывести цифры заданного числа в обратном порядке.

Answer 1

Var
   n:integer;
Begin
Write('n = ');
ReadLn(n);
While n > 0 do
   Begin
   Write(n mod 10);
   n:=n div 10
   End;
End.

Answer 2

var
n:integer;

begin
readln(n);
writeln(ReverseString(n.ToString));
end.