Получить префикс строки до первого вхождения символа ":" - Prolog

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

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

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

Решение задачи: «Получить префикс строки до первого вхождения символа ":"»

textual
Листинг программы
predicates
get_pref(string,char,string)
 
clauses
get_pref("",_,"").
get_pref(S,P,"") :- frontchar(S,Q,_), P=Q.
get_pref(S,P,R) :- frontchar(S,Q,L), Q<>P, get_pref(L,P,U), frontchar(R,Q,U).
 
goal
 
get_pref("QWERT:YUIOP",':',R),write(R),nl.

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

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