文档章节

【SICP练习】32 练习1.38

NoMasp
 NoMasp
发布于 2015/09/08 21:49
字数 238
阅读 0
收藏 0


练习1.38

我最喜欢做数学上的观察题了,这里也有一个Di,其依次为12114116118……我最先看到的是除了一开始的2个之外,每三个数字的规律是前面是两个1,后面是个递增的偶数。于是我们便可轻而易举的写出这个函数了。

(define (d i)

   (if (= (remainder (- i 2) 3) 0)

      (* (+ (/ (- i 2) 3) 1) 2)

      1))

n一直都是1,于是我们定义为:

(define (n i) 1)

由于题中是e-2的连分式,所以在最后的结果上应该再加上2.0

(define (e k)

    (define (n i) 1)

    (define (d i)

        (if (= (remainder (- i 2) 3) 0)

           (* (+ (/ (- i 2) 3) 1) 2)

           1))

     (+ (cont-frac n d k) 2.0))

下面我们来测试一下:

(e 2015)

;Value: 2.718281828459045

版权声明:本文为 NoMasp柯于旺 原创文章,未经许可严禁转载!欢迎访问我的博客:http://blog.csdn.net/nomasp

本文转载自:http://blog.csdn.net/nomasp/article/details/43867401

NoMasp
粉丝 7
博文 334
码字总数 0
作品 0
镇江
程序员
私信 提问
​Beaglebone Black教程Beaglebone Black的引脚分配

Beaglebone Black教程Beaglebone Black的引脚分配 Beaglebone Black的引脚分配 绝大多数的微型开发平台都提供了一些称为GPIO的输入输出端口。这些端口可以让你使用软件和硬件来控制一些电子的...

大学霸
2016/03/28
738
0
Rust 1.38 稳定版发布

Rust 1.38 已经发布了,Rust 1.38.0 稳定版内容如下: 管道编译(pipelined compilation) 如果想要编译 crate,编译器不需要完全构建依赖项,只需要它们的“元数据”(即类型、依赖项、导出的列...

afterer
09/29
8.8K
67
windows下搭建seafile服务器,拥有自己的个人云盘,不再担心网盘丢

1、 下载所需环境、软件(Python 2.7.11 32 位版本) 注意:一定要使用 Python 2.7.11 32 位版本。64 位版本或不是 2.7.11 的版本不能工作。 2、双击安装python-2.7.11,一直next知道完成。 ...

D杀手D
2017/11/20
0
0
VMware-Powercli常用脚本

目 录 1.1 修改ESXI主机的root密码... 5 1.2 将本地文件传输到VM... 5 1.3 修改虚拟机硬件版本... 5 1.4 查看虚拟机快照... 6 1.5 更改虚拟机网卡... 6 1.6 批量开关虚拟机... 6 1.7 批量模板...

qq8658868
2017/09/20
0
0
关东升的《从零开始学Swift》第2版已经出版

关东升的《从零开始学Swift》第2版已经出版 大家好: 苹果2015WWDC大会发布了Swift2.0,它较之前的版本Swift1.x有很大的变化,所以我即将出版《从零开始学Swift》 《从零开始学Swift》将在《...

tony关东升
2016/02/24
0
0

没有更多内容

加载失败,请刷新页面

加载更多

新架构、新角色:TiDB Community Upgrade!

作者:Jian Zhang 经过几年的发展,TiDB 社区已经逐渐成熟,但是随着社区的发展壮大,我们逐渐感受到了现在社区架构上的一些不足。经过一系列的思考和总结,我们决定升级和调整目前社区组织架...

TiDB
30分钟前
6
0
jquery qrcode库提示not function

jquery qrcode 这个库能用,但是必须在初始化的时候,官方给的使用方法是 引入qrcode的库文件后,在js中写以下 html <div id="qrcode"></div> js jQuery('#qrcode').qrcode({ render: ......

shikamaru
35分钟前
14
0
MySQL数据库去重的简单方案

利用 distinct 对需要处理的字段进行去重 select distinct 字段名 from 表名 利用group by select * from 表名 group by 字段名 利用having select * from 表名 group by 字段名 having 字段...

FeanLau
37分钟前
9
0
字符串转换成整数

实现一个 atoi 函数,使其能将字符串转换成整数。 首先,该函数会根据需要丢弃无用的开头空格字符,直到寻找到第一个非空格的字符为止。 当我们寻找到的第一个非空字符为正或者负号时,则将该...

蔚蓝_晴天
49分钟前
8
0
Eureka客户端续约及服务端过期租约清理源码解析

在之前的文章:EurekaClient自动装配及启动流程解析中,我们提到了在构造DiscoveryClient时除了包含注册流程之外,还调度了一个心跳线程: scheduler.schedule( new Ti...

Java学习录
今天
10
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部