问列表中交替元素的总和
EN

Stack Overflow用户

提问于 2014-11-22 19:52:18

回答 1查看 370关注 0票数 1

我正在尝试计算列表中交替元素的和，但它不能正常工作，并且我找不到问题……请帮帮我。

如果我有一个列表: 1,2,3,4，它应该返回1 -2 +3-4 =-2。

这是我的代码：

poz(E,[],0):-!.
poz(E,L,N):-poz_aux(E,L,N,1).

poz_aux(E,[E|_],N,N).
poz_aux(E,[_|T],N,K):-
    K1 is K + 1,
    poz_aux(E,T,N,K1).

suma([],0).
suma(L,S):-suma_aux(L,S,L,0).

suma_aux([],S,_,S).
suma_aux([H|T],S,L,S1):-
    poz(H,L,P),
    P mod 2 = 1,
    S2 is S1 + H,
    suma_aux(T,S,L,S2).
suma_aux([H|T],S,L,S1):-
    poz(H,L,P),
    P mod 2 = 0,
    S2 is S1 - H,
    suma_aux(T,S,L,S2).

prolog

回答 1

Stack Overflow用户

发布于 2014-11-22 20:13:29

这样的事情可以用程序结构更好地表达出来：

list_altsum([], 0).
list_altsum([A], S) :-
   S is A.
list_altsum([A,B|ABs],S0) :-
   list_alsum(ABs, S1),
   S0 is A-B+S1.

或者：

list_altsum(Xs, S) :-
   list_altsum(Xs, 1, S).

list_altsum([], _, 0).
list_altsum([A|As], F0, S0) :-
   F1 is -F0,
   list_altsum(As, F1, S1),
   S0 is F0*A+S1.

票数 2

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/27077064

复制

相似问题

问列表中交替元素的总和
EN

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问列表中交替元素的总和EN

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问列表中交替元素的总和
EN