1. Разбери последовательность в массив. Пусть массив будет 1..N
2. Далее циклом от 2 до N идешь и проверяешь 2 условия: что текущее слово не равно первому (элемент массива 1) и что содержит последнюю букву как минимум 2 раза. Для второго условия можно сделать так: (Pos(S[i][Length(S[i])],S[i]) > 0) And (Pos(S[i][Length(S[i])],S[i]) < Length(S[i]))
|