sicp-ex-1.38

 (define (e-euler k) 
   (+ 2.0 (cont-frac (lambda (i) 1) 
                     (lambda (i) 
                       (if (= (remainder i 3) 2) 
                           (/ (+ i 1) 1.5) 
                           1)) 
                     k))) 

<< Previous exercise (1.37) | Next exercise (1.39) >>