Рекурсивная обработка списков

@GoodGirl1 · Регистрация: 24.11.2015

Author24 — интернет-сервис помощи студентам

Напишите предикат, находящий минимальный и максимальный элементы списка.

@Catstail · 10.12.2015, 20:41

Prolog

domains
int=integer
intl=int*
 
predicates
minimax(intl,int,int)
 
clauses
minimax([X],X,X).
minimax([H|T],H,MAX) :- minimax(T,MIN1,MAX), H<MIN1.
minimax([H|T],MIN,H) :- minimax(T,MIN,MAX1), H>MAX1.
minimax([H|T],MIN,MAX) :- minimax(T,MIN,MAX), H>MIN, H<MAX.

@GoodGirl1 1 / 1 / 0 Регистрация: 24.11.2015 Сообщений: 29
		1
	Рекурсивная обработка списков 09.12.2015, 13:56. Показов 695. Ответов 1 Метки нет (Все метки) Напишите предикат, находящий минимальный и максимальный элементы списка. 0

	10.12.2015, 20:41