我试图获得方案中每个偶数元素的总和
Im trying to get the sum of every even element in scheme
这就是我目前所知道的,请协助我哪里出错了
(define helper
(lambda (lis)
(cond
((null? lis) 0)
((null? (cdr lis)) 0)
(else (+ (helper (cdr (cdr lis))))))))
(define (sumEven lis)
(display (helper lis)))
我是这样调用函数的:
(define (sumEven lis)
(display (helper lis)))
您忘记添加元素:
(else (+ (car (cdr lis)) (helper (cdr (cdr lis))))))))
这就是我目前所知道的,请协助我哪里出错了
(define helper
(lambda (lis)
(cond
((null? lis) 0)
((null? (cdr lis)) 0)
(else (+ (helper (cdr (cdr lis))))))))
(define (sumEven lis)
(display (helper lis)))
我是这样调用函数的:
(define (sumEven lis)
(display (helper lis)))
您忘记添加元素:
(else (+ (car (cdr lis)) (helper (cdr (cdr lis))))))))