swi prolog,匹配数据
这是我的源代码,有人可以告诉我什么是错误吗?这是最好的方法,我想显示谁匹配谁......有人可以帮助我吗? % Author: % Date: 08-Sep-11 person(may,…
Prolog,如何在 write() 中显示多个输出
go :- match(Mn,Fn), write('--Matching Result--'), nl, write(Mn), write(' match with '), write(Fn), match(Mn1,Fn1). person(may,female,25,blue…
为什么我在序言中找不到斑马谜题的答案?
这是我目前的代码,我正在尝试解决斑马拼图。 exists(A,(A,_,_,_,_)). exists(A,(_,A,_,_,_)). exists(A,(_,_,A,_,_)). exists(A,(_,_,_,A,_)). exist…
Prolog:将列表附加到自身
假设我有一个列表 ListSum,并且我想递归地向 ListSum 追加一个新列表, appList(ListSum):- %%generate a list: ListTemp, append(ListTemp,ListSum,…
Prolog 常用规则和事实
Prolog 有标准谓词库吗?我正在开发一个具有常识的聊天机器人。除了数学规则和事实之外,我还需要一些英语基本谓词,例如, even(A) :- 0 is A mod 2.…
对城市进行分组的序言程序
我在这里需要帮助,这是一个作业 序言程序,显示哪些城市位于 尼日利亚东南部。以下是城市(abraka、oyo、awka、 orlu、markurdi、jalingo、oweri、ab…
Prolog:添加要设置的列表
下面的谓词将项目 X 添加到列表 S 中。它工作得很好。 addToSet(X, S, S) :- atomic(X), member(X, S), !. addToSet(X, S, [X|S]) :- atomic(X). 我试…
swi prolog,如何读取txt.file的数据
有人可以帮助我完成文件读取谓词吗? get_userinfo: write('\nEnter Name:'), readln(Name), write('\nEnter Gender:'), read(Gender), append('marri…
将 C# 转换为 Prolog 代码:递归 while 循环
晚上好,在解决了我之前的问题之后,这里,我在 Prolog 版本中遇到了最后一个问题: 比较规则:给定两个自定义对象,该方法找到它们之间的第一个相等…
Prolog - 计算树中叶子的数量
例如,如果我有一棵树,如下所示: tree3(b(l(1),b(l(2),l(3)))). 我将如何编写一个计算叶子数量的程序? 我希望它在使用时看起来像这样: ?- tree3(T…
Prolog:如何执行“检查(a++b++c++d 等于 d++a++ ;c++b) ->是的”
让我们定义自定义运算符 - 让它为 ++、equals :- op(900, yfx, equals). :- op(800, xfy, ++). 事实上: check(A equals A). 我尝试创建谓词,让它为 …