我正在尝试实现一个计算 list 的函数，其名称是sum -
(define (sum elemList)
(if
(null? elemList)
(+ (car elemList) (sum (cdr elemList)))
0
)
)
上面的实现给出了错误的结果，例如 -
> (sum (list 1 2 3 4 ))
0
我在这里做错了什么？
我认为你交换了then和else的一部分if:
(define (sum elemList)
(if
(null? elemList)
0
(+ (car elemList) (sum (cdr elemList)))
)
)
在原始函数中，对于每个非空列表，0被返回。
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
