计算机程序的构造和解释 练习题1.39

按照题目整理得出N和D的公式
$$\begin{gathered} N_1=x \\ {N}_i=-x^2(i>1) \\ {D}_i=2\ast i-1 \end{gathered}$$
过程代码为：

#lang racket
(define pi 3.1415926)
(define (cont-frac n d k)
  (define (recursion a)
  (if (= a k) (/ (n a) (d a))
      (/ (n a) (+ (d a) (recursion (+ a 1))))))
  (recursion 1)
)


(define (tan-cf x k)
  (cont-frac (lambda (i)
                    (if(= i 1) x (- 0 (* x x))))
                  (lambda (i) (- (* 2 i) 1))
                  k))
//计算tan60°也就是tan(π/6)
(tan-cf (/ pi 6) 100)

运算结果正确

0.577350257280783