Напишите функцию в паскале, которая "разворачивает" десятичную запись числа наоборот, например, из 123 получается 321,а из 3210-0123.(именно через функцию и с объяснением)

Function reverse(s: string): string; var s1: string; i: integer; begin for i: =1 to length(s) do s1: =s[i]+s1; reverse: =s1; end; var s: string; begin readln(s); s: =reverse(s); writeln(s); end.

var

  n,i,a: integer;

begin

  readln(n);

  for i: =1 to n do

  begin

  read(a);

  write(abs(a),' ');

end;

end.

 

2, 4, 8, 16 (двоичная (10000), четверичная (100), восьмеричная (20), шестнадцатеричная (10))