Заданную строковую переменную записать в обратной последовательности
Какую запись?
Var s :string; i :integer; begin writeln('введите переменную'); readln(s); for i:=(Length(s)) downto 1 do write (s[i]); end.