练习1.39
没想到最后一道题如此简单,n和d的过程可以如下定义:
(define (n i)
(if (= i 1)
i
(- (* i i))))
(define (d i)
(- (* 2 i) 1))
这里我们就不再重复写成块结构了。
(define (tan-cf x k)
(cont-frac n d k))
我测试了(tan-cf 100 100)以后吓了一跳,如果在(cont-frac n d k)前加一个exact-inexact就会好得多,这是将分数转换为浮点数的函数。
版权声明:本文为 NoMasp柯于旺 原创文章,如需转载请联系本人。
本文介绍了一个简单的Scheme程序,用于通过连续分数计算tan值。该程序定义了n和d过程来构建连续分数,并使用cont-frac过程计算最终的tan值。通过测试发现,加入exact-inexact函数将分数转换为浮点数能显著改善结果。
1万+

被折叠的 条评论
为什么被折叠?



