Программа, которая преобразует список целых чисел во множество - Prolog

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

Добрый день! Помогите, пожалуйста, решить задачу. Напишите на языке ПРОЛОГ программу, которая преобразует список целых чисел во множество. Список вводится с клавиатуры, цель – внутренняя. Например: Список [1,2,1,4,1,2,3] преобразуется в [1,2,4,3].

Код к задаче: «Программа, которая преобразует список целых чисел во множество - Prolog»

textual
domains
int=integer
intl=int*
 
predicates
remove(int,intl,intl)
setOf(intl,intl)
 
clauses
remove(_,[],[]).
remove(X,[X|T],R) :- remove(X,T,R).
remove(X,[Y|T],[Y|R]) :- X<>Y, remove(X,T,R).
 
setOf([],[]).
setOf([H|T],[H|R]) :- remove(H,T,Q), setOf(Q,R).

11   голосов, оценка 4.273 из 5


СОХРАНИТЬ ССЫЛКУ