Проверить, встречаются ли в строке три подряд идущих повторяющихся символа - Prolog

Узнай цену своей работы

Формулировка задачи:

Дана строка. Проверьте, встречаются ли в ней три подряд идущих повторяющихся символа.

Решение задачи: «Проверить, встречаются ли в строке три подряд идущих повторяющихся символа»

textual
Листинг программы
predicates
test(string)
 
clauses
test("") :- fail.
test(S) :- frontchar(S,A,S1), frontchar(S1,A,S2), frontchar(S2,A,_),!.
test(S) :- frontchar(S,_,S1),test(S1).

Оцени полезность:

8   голосов , оценка 3.875 из 5
Похожие ответы