sicp/zapiski/3_g1smo.org

Zapiski #2 srečanja programerskega bralnega krožka SICP

Teme

Funkcije višjega reda

Vaje

1.29 Simpsonovo pravilo

1.30 linearen sum

  (define (sum term a next b)
    (if (> a b)
        0
        (+ (term a)
           (sum term (next a) next b))))

  (define (sum-iter term a next b)
    (define (iter a result)
      (if (> a b)
         result
         (iter (next a) (+ result (term a)))))
    (iter a 0))