Написать программу, которая запрашивает строку, затем сначала выводит строку в "перевернутом" виде (например, вводим РОЗА). Затем та же строка выводится в прямом виде (выводится АЗОР).

М

STIFLER, заголовок поменяй, "help" никак не может быть информативным... (Правила Форума, п. 4)

Палиндромы

Ozzя, при чем тут палиндромы?

Напечатать строку наоборот можно так, например:

for i:=Length(s) downto 1 do Write(s[i]);

Там по ссылке:

{Этой функции присваевается значение перевернутого слова}
function palindrom(x:string):string;
var
  str:string;
  j:integer;
begin
  str:='';
  for j:=length(x) downto 1 do str:=str+x[j];
  palindrom:=str;
end;