min_max_sum.pro

maximo([], X, X):-!.

maximo([H|T], X, N):-
	H > N,
	maximo(T, X, H).

maximo([_|T], X, N):-
	maximo(T, X, N).

minimo([], X, X):-!.
minimo([H|T], X, N):-
        H < N,
        minimo(T, X, H).

minimo([_|T], X, N):-
        minimo(T, X, N).

suma([], X, X):-!.
suma([H|T], X, N):-
	M is N + H, !,
	suma(T, X, M).