Строки, опять строки "Надоели уже" Опции

[m@xvel]

Помогите с решением. Никак не могу понять как ее делать , и через 'Палиндром" не получается , мне нужно чисто со Строковыми данными работать. Сама задача: " В заданном тексте найти все пары слов из которых одно является обращением другого". Заранее благодарен.

[m@xvel]

Не пойму как в заданном тексте найти все пары слов, и еще вопрос, а зачем мне надо разбиение на слова если мне надо определить слова из которых одно является обращением другого?

[Malice]

Разбил на слова в массив, потом:

for i:=1 to n-1 do
 for j:=i+1 to n do 
  if words[i]=polyndrom(words[j]) then writeln (words[i],'-',words[j]);

Осталось только функцию polyndrom, если сам не сможешь, то поиском.