Найти декартово произведение двух числовых списков - Prolog
Формулировка задачи:
Доброго времени суток!
Помогите, пожалуйста, с заданием: написать программу на прологе, которая находила бы декартово произведение двух целочисленных списков. То, что нашлось на форуме, не соединяет списки уже по три элемента в каждом. А нужно, чтобы работало на любых входных данных.
Заранее спасибо!
Решение задачи: «Найти декартово произведение двух числовых списков - Prolog»
textual
Листинг программы
cartesian([],_,[]). cartesian([H|T],L,[HL|T1]):-one_line(H,L,HL), cartesian(T,L,L1). one_line(A,[],[]). one_line(A,[H|T],[[A,H]|T1]):-one_line(A,T,T1).
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д