Информатика, программирование на языке паскаль.Введенную строку вывести в обратном порядке (с последней буквы начинается и первой заканчивается)

var s:string; i:integer;
begin
writeln('Введите строку:');
readln(s);
for i:=length(s) downto 1 do write(s[i]);
writeln;
end.

Пример:
Введите строку
укортс етидевВ