Помогите написать программу для вычисления декартова произведения множеств - Prolog

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

Помогите написать программу для вычисления декартова произведения множеств

Код к задаче: «Помогите написать программу для вычисления декартова произведения множеств - Prolog»

textual
добавить(il,integer,il).
добавить([Г|Хвост],Эл,[Г|Результат]):- добавить(Хвост,Эл,Результат).
добавить([],Эл,[Эл]).
добавить([1,2,3,4],5,Список).
 
Результаты без отсечения
?- добавить([1,2,3,4],5,Список).
Список = [1, 2, 3, 4, 5].
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

8   голосов, оценка 3.875 из 5


СДЕЛАЙТЕ РЕПОСТ