Определить сколько слов в строке является палиндромом (читаются одинаково как слева направо, так и справа налево). В основной программе написать подпрограмму, определяющую является ли слово палиндромом.

.ToWords.Where(w->IsPalindrom(w)).Count - тут три метода и каждый отделяется точкой, образуя цепочку. ToWords, Where, Count - вот они.

Результат работы ("выход") каждого метода слева направо передается на "вход" следующему.

Назначения всех методов описаны в справочной системе PascalABC.NET 3.1

большое спасибо)

Тут для "спасибо есть кнопочка))) Чтобы не писать))

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016function IsPalindrom(w:string):=(w.Length>1?w=ReverseString(w):False);begin  var s:=ReadlnString('>');  Writeln('Палиндромов: ',s.ToWords.Where(w->IsPalindrom(w)).Count)end.Тестовое решение> мадам ваш заказ уже несут - слышу топот официантаПалиндромов: 3