Удалить из списка элементы больше заданного элемента - Prolog
Формулировка задачи:
Delete([1,3,13,15,10,16,7],14,R) -> R=[1,3,13,10,7]
Решение задачи: «Удалить из списка элементы больше заданного элемента»
textual
Листинг программы
- domains
- int=integer
- intl=int*
- predicates
- filter(intl,int,intl)
- clauses
- filter([],_,[]).
- filter([H|T],F,[H|TT]) :- H<=F, filter(T,F,TT).
- filter([H|T],F,TT) :- H>F, filter(T,F,TT).
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
