Предикаты "чет" и "нечет", определяющие чётность и нечётность длины списка - Prolog

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

3.Определить предикаты "чет" и "нечет" определяющие чётность и нечётность длины списка

% Объединение списков
% объединить(список1, список2, результат)
объединить([], L, L).
объединить([X | L1], L2, [X | L]) :- % первым элементом объединения является
                                     % первый элемент первого списка
    объединить(L1, L2, L). % обединить хвост первого списка со вторым списком

Решение задачи: «Предикаты "чет" и "нечет", определяющие чётность и нечётность длины списка»

textual
                            Листинг программы 
                        

                            even([]).
even([_|T]) :- odd(T).
 
odd([_]).
odd([_|T]) :- even(T).
                        

Оцени полезность:

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

Похожие ответы