Лабораторная работа № 3 (язык Пролог)

Цель лабораторной работы.

Освоение программирования на языке Пролог с использованием списков.

Описание задания:

Разработать программу с использованием списков, отвечающую следующим требованиям.

А) По индивидуальному заданию добавить в программу правила для решения задачи.

11. Преобразовать список целых чисел A1, A2, ..., An следующим образом: исключить нули, слева записать все положительные числа, справа - все отрицательные.

Текст программы:

delete(_,[],L,L).

delete(X,[X|L],L1,L2):- delete(X,L,L1,L2).

delete(X,[Y|L],L1,L2):- X \== Y, delete(X,L,[Y|L1],L2).

split(_,[],[],[]).

split(_,[X|L],[X|L1],L2):- X @>0, split(_,L,L1,L2).

split(_,[X|L],L1,[X|L2]):- X @=<0, split(_,L,L1,L2).

concat([],L2,L2).

concat([X|L1],L2,[X|L3]):-concat(L1,L2,L3).

reverse([],Lr,Lr).

reverse([X|L],L1,Lr):-reverse(L,[X|L1],Lr).

Результат запроса

Вывод:

В ходе выполнения работы было освоено программирование на языке пролог с использованием списков.