здравствуйте, помогите пожалуйста с программой для языка паскаль. задача. Вывести на экран задом наперёд данную строку симвтолов . спасибо

1.Var S : String;  i : Byte;Begin  Readln(S);  For i:=Length(S) downto 1 do Write(S[i]);  Writeln;end.2.Function StRevers(St : String) : String;Begin  If Length(St)>1 then StRevers:=St[Length(St)]+StRevers(Copy(St,2,Length(St)-2))+St[1]   else StRevers:=St;end;Var S : String;Begin  Readln(S);  Writeln(StRevers(S));end.