Pascal, через строки, без обращений(без функций с квадратными скобками)
Дана строка содержащая любые символы кроме русских букв.
Под "словом" будем понимать последовательность символов, ограниченную пробелами или стоящую в конце или начале строки. Между словами может быть несколько пробелов. Так же пробелы могут быть в конце или начале строки.
Написать функцию, которая в заданной строке находит количество cлов - палиндромов.
Использовать заголовок:
function CalcWord(Stroka: string): integer;

Программа:
var r:string
begin
readln(r)
writeln(CalcWord(r));
end.

Для  данной сортировки используем алгоритм сортировки слиянием

В начале разбиваем арбузы на 2 группы по 2Каждую группу взвешиваем и сортируем (т.е. всего 2 взвешивания)Теперь собираем вместе, сравниваем сначала более легкие арбузы и находим самый легкий (всего 3 взвешивания)Теперь сравниваем тяжелый арбуз, что в группе с самым легким и более легкий из другой группы, и определяем второй по легкости (всего 4 взвешивания)Потом взвешиваем оставшиеся арбузы и докладываем их  по порядку (всего 5 взвешивания)

Если разрисовывать варианты составления слов, то на рисунке получится древовидная структура, со множеством разветвлений (это я показал на рисунке, для первых двух этапов).

Начало- пункт старт.

1) Выбираем первую букву: от пункта старт идут пять ответвлений- по количеству букв, которые можно поставить на первое место в слове (буквы АГЖФЯ -в каждом ответвлении мы выбираем одну из них).

2) Выбираем вторую букву: от каждой буквы первого этапа идут по четыре ответвления (ведь одну букву мы уже использовали, поставив её на первое место, теперь у нас остаётся четыре буквы;  в каждом ответвлении мы выбираем одну из них).
Получается, у нас было пять начальных вариантов, и каждый из них разветвился ещё на четыре варианта- то есть было пять вариантов, а стало в четыре раза больше  (5*4=20 вариантов).

3) Выбираем третью букву: от каждой буквы второго этапа идут по три ответвления. Получается 5*4*3=60 вариантов.

Это и есть число возможных трёхбуквенных слов- 60.
Для каждого из этих слов в дереве есть отдельный путь от пункта старт до выбора третьей буквы.

Рисовать всё дерево вариантов не обязательно, ведь оно весьма большое. Достаточно понять принцип, как оно строится, и как посчитать число вариантов.