1.30

secje posted @ 2010年7月06日 05:36 in sicp , 1400 阅读
(define (sum term a next b)
  (define (iter a result)
    (if (> a b)
        result
        (iter (next a) (+ result (term a)))))
  (iter a 0))

 


登录 *


loading captcha image...
(输入验证码)
or Ctrl+Enter