删除Prolog中的倍数
删除Prolog中的倍数
提问于 2017-09-23 14:49:25
我试着做这个练习，我应该构建一个prolog程序，当给定一个数字和一个列表时，它返回一个没有数字倍数的列表。现在我要说的是：
rm([],[]).
rm(N, [Head|Tail], Result):-
Head mod N =:= 0,
rm(N, Tail, Result).
rm(N, [Head|Tail], [Head|Result]):-
Head mod N =\= 0,
rm(N, Tail, Result). 这不管用，我也不太明白为什么。
我希望有人能解释一下为什么这不管用。
谢谢
回答 1
Stack Overflow用户
发布于 2017-09-23 15:17:00
如果使用SWI，则可以进行功能设计：
:-use_module(library('lambda.pl')).
removeMultiples(N, In, Out) :-
exclude(N+\X^(X mod N =:= 0), In, Out).页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/46380831
复制相关文章
相似问题
腾讯云开发者
