Так вот проблема: Написать предикат triple(Xs,Ys) < - Каждый элемент в Ys является членом Xs и происходит три раза подряд в Ys Пример: ?- triple([a,b,c], L).
L = [a,a,a,b,b,b,c,c,c]
add(X,Xs,[X|Xs
У меня есть предикат next, который по существу удаляет числа из списка, пытаясь уменьшить общий размер списка. Так, например, у меня есть список: [3,2,1]
следующий будет удалить определенные значени
Сначала я загрузить файл с SWI-Prolog $ swipl file.pl
я изменить файл и сохранить. Теперь, как я перезагрузить файл как ?- reload
для этого модифицированного file.pl?
Я создаю программу, которая должна разрешать поиск по графику, но функция, которая должна возвращать список узлов-преемников, терпит неудачу, когда вызов findall/3 оценивается как false. Когда я пытаю
Так что мне нужно написать пролог под названием doubleAll7/2, который принимает два списка. Программа возвращает true, если для каждого 7, которое встречается в первом списке, во втором списке есть дв