Удалить из списка элементы больше заданного элемента - 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).
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д