文档章节

【SICP练习】86 练习2.58

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

练习2.58

如果要由前序变成中序那就要有些大变动了。

(define (make-sum a1 a2) (cond ((=number? a1 0) a2) ((=number? a2 0) a1) ((and (number? a1) (number? a2)) (+ a1 a2)) (else (list a1 ‘+ a2))))
(define (sum? x) (and (pair? x) (eq? (cadr x) ‘+)))
(define (addend s) (car s))

其余的都不变。将乘法的计算用中序表达:

(define (make-product m1 m2) (cond ((or (=number? m1 0) (=number? m2 0)) 0) ((=number? m1 1) m2) ((=number? m2 1) m1) ((and (number? m1) (number? m2)) (* m1 m2)) (else (list m1 ‘* m2))))

对应的product?和multiplier也要做修改。

(define (product? x) (and (pair? x) (eq? (cadr x) ‘*)))
(define (multiplier p) (car p))

而deriv则与书上的代码一样不必修改。至于第二小题,貌似无解。如果有知道的,望告知。



感谢访问,希望对您有所帮助。 欢迎关注或收藏、评论或点赞。


为使本文得到斧正和提问,转载请注明出处:
http://blog.csdn.net/nomasp


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

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

NoMasp
粉丝 7
博文 334
码字总数 0
作品 0
镇江
程序员
私信 提问
加载中

评论(0)

你的输入法顺手吗

作为一个程序员,没有一个顺手的输入法是囧的,今天打字打着就觉得不爽,因为86版的五笔老是有的词不会拆分。原本打算上网下载一个练习软件练习一下的,可是上网之后让我大吃了一惊:有原来五...

曾赛
2009/09/18
121
2
Dnsmasq 2.59 发布

DNSmasq是一个轻巧的,容易使用的DNS服务工具,它可以应用在内部网和Internet连接的时候的IP地址NAT转换,也可以用做小型网络的DNS服务。 该版本修复了 2.58 中的很多bug,特别是 IPv6 下启动...

红薯
2011/10/19
309
0
脚本进阶,函数调用实例练习

一、练习:脚本:判定192.168.0.200-192.168.0.254之间哪些主机在线,要求: 1、使用函数来实现一台主机的判定过程: 2、在主程序中调用此函数判定指定范围内的所有主机的在线情况, vim pi...

hrman
2018/01/07
0
0
赛车模拟器--TORCS

TORCS是一个具有高度可移植性的赛车模拟器。它可作为普通的赛车游戏,同样能做为赛车游戏和人工智能的研究平台。它可运行在Linux(x86,AMD64,PPC),FreeBSD,Mac OS X和Windows之上。 它有5...

匿名
2008/12/05
7.4K
0
自己搭建练习sql语句的环境~

突然想练习下sql语句,想在网上找个环境练习下找了半天既然没有。看到了一篇博文就以这篇博文为例子搭建个环境。(用到的工具打包)链接:http://pan.baidu.com/s/1nv8y8OD 密码:o5ls Navi...

skaiser
2017/06/19
0
0

没有更多内容

加载失败,请刷新页面

加载更多

Spring基础

主要用于service层; 轻量级java开发框架; 各层 web层:struts,spring-MVC service层:spring dao层:hibernate,mybatis , jdbcTemplate --> spring-data Spring核心:控制反转IOC 切面编...

七宝1
16分钟前
19
0
解决overflow+border-radius+transform圆角问题

网上还有其他版本,但是对我来说都不好使,下面是我在Chrome上的代码。overflow:hidden依然是不能正常使用,换成unset就可以,读者如果有更好的解决方案,请留言,谢谢。 <figure> <img...

hi懒喵
21分钟前
39
0
《C语言》—— 数组

书籍使我变成了一个幸福的人,使我的生活变成轻松而舒适的诗。——高尔基 本文已经收录至我的GitHub,欢迎大家踊跃star 和 issues。 https://github.com/midou-tech/articles 点关注,不迷路!...

龙跃十二
35分钟前
60
0
Java小案例: 1000以内的水仙花数

要求在控制台分别展示1000以内的水仙花数。 如下:↓ 水仙花数规则: 水仙花数至少是一个3位数 每位数字的立方数的累加和,正好等于该数字本身。 例如:153就是一个水仙花数。每位数字分别...

漫路h
昨天
66
0
centos 防火墙端口设置

查看开放的端口号 firewall-cmd --lists-all 设置开放的端口号 firewall-cmd --add-service=http --permanent 1. //--permanent表示永久生效,不加这个参数的话只会针对本次执行完命令生效,重...

ACE_LCX
昨天
25
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部