计数参数值
计数参数值
提问于 2016-03-12 12:41:43
我是一个初学者Prolog/SWI猫头鹰程序员，并希望通过计算单词中每个字母的分数来计算在SWI中输入的单词的分数--就像拼字一样！
每个词的要点将以事实的形式加以说明，如下所示：
letter_point(a, 1).
letter_point(b, 3).
letter_point(c, 3).
letter_point(d, 2).
% etc.这些事实的数值论点应使用谓词‘score /2’计算，其中单词(list)和总分(number)作为参数，以便得到以下结果：
?- letters_score([a, b, c, d], Score).
Score = 9.我假设这可以用'is/2‘来计算列表中每个字母的数值参数，但我还不知道如何达到这个目的。任何关于如何做到这一点的帮助将是非常感谢的！
最好的，劳拉
回答 1
Stack Overflow用户
回答已采纳
发布于 2016-03-12 13:48:23
易解
% foo(Arg1,Arg2)
foo(a,1).
foo(b,2).
foo(c,3).
sum_foo_from_list([],0).
sum_foo_from_list([Arg1|Rest],Sum_Arg2) :-
% ?Arg2
foo(Arg1,Arg2),
% #= (clpfd library)
Sum_Arg2 #= Arg2 + Sum_Arg2_,
% Sum_Arg2 is diffrent to Sum_Arg2_
sum_foo_from_list(Rest,Sum_Arg2_). 测试:
| ?- sum_foo_from_list([a,b],N).
N = 3页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/35957758
复制相关文章
相似问题
腾讯云开发者
