PascalABC помощь с задачей

Question

Дано слово из цифр ( тоесть, например дано N, n=123, n:string)
Вывести его наоборот и в число ( то есть, b=321,b:integer;)

glavsborshchik · Accepted Answer

var s,n:string; k,i:integer;
begin
readln(n);
k:=length(n);
for i:=k downto 1 do
s:=s+n[i];
writeln(s);
end.

user_222373963 · Answer

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