Напечатать те слова последовательности, которые отличны от первого слова и удовлетворяют заданному свойству - Pascal ABC
Формулировка задачи:
Дана последовательность, содержащая от 2 до 50 слов, в каждом из которых от 1 до 8 строчных латинских букв; между соседними словами - не менее одного пробела, за последним словом - точка. Напечатать те слова последовательности, которые отличны от первого слова и удовлетворяют следующему свойству:слово симметрично
Решение задачи: «Напечатать те слова последовательности, которые отличны от первого слова и удовлетворяют заданному свойству»
textual
Листинг программы
if length(A[i])>8 then begin B[i]:=false; goto otbor; end;