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

function reverse(s:string):string;var s1:string;i:integer;beginfor i:=1 to length(s) dos1:=s[i]+s1;reverse:=s1;end;var s:string;beginreadln(s);s:=reverse(s);writeln(s);end.