Предикат, который продублирует вхождение каждого символа в строку - Prolog
Формулировка задачи:
Создайте предикат, который продублирует вхождение каждого символа в строку.
Решение задачи: «Предикат, который продублирует вхождение каждого символа в строку»
textual
Листинг программы
predicates
dup(string,string)
clauses
dup("","").
dup(S,SS) :- frontchar(S,B,RS),dup(RS,RSS),frontchar(Q,B,RSS),frontchar(SS,B,Q).