recursion - 如何使用递归对 x 和 y 之间的数字求和/相加？

Question

我想问一下，您将如何进行递归，从您的起始数字 (x) 到结尾 (y)。

例如= 总和(答案，1, 5)。答案 = 15

(1+2+3+4+5) = 15//是递归应该发生的事情

到目前为止，我所做的是:

sumFrom(Sum, X ,Y) :- X>Y, !, write('Start should not be greater than End').
sumFrom(Sum, X ,Y) :- Sum is X+Y,
        Next is X+1,
        sumFrom(Sum, Next, Y).

我还是新手，所以请温柔。

Answer 1

由于 Prolog 的纯(声明性子集)没有循环和可变变量，因此执行算术可能会很棘手。我认为值得了解libraries ，当基本变得清晰时:

?- aggregate(sum(N),between(1,5,N),S).
S = 15.