CG@CPPBLOG

/*=========================================*/
随笔 - 76, 文章 - 39, 评论 - 137, 引用 - 0
数据加载中……

我的SICP习题答案（1.9）

很显然，第一个是递归的，第二个是迭代的。

(+ 4 5)
(if (= 4 0) 5 (inc (+ (dec 4) 5)))
(inc (+ 3 5))
(inc (if (= 3 0) 5 (inc (+ 2 5))))
(inc (inc (if (= 2 0) 5 (inc (+ 1 5)))))
(inc (inc (inc (if (= 1 0) 5 (inc (+ 0 5))))))
(inc (inc (inc (inc (if (= 0 0) 5 (inc (+ (dec 0) 5)))))))
(inc (inc (inc (inc 5))))
(inc (inc (inc 6)))
(inc (inc 7))
(inc 8)
9

(+ 4 5)
(if (= 4 0) 5 (+ 3 6))
(if (= 3 0) 6 (+ 2 7))
(if (= 2 0) 7 (+ 1 8))
(if (= 1 0) 8 (+ 0 9))
(if (= 0 0) 9 (+ (dec 0) (inc 9)))
9

posted on 2008-03-11 21:53 cuigang 阅读(1419) 评论(2)  编辑 收藏 引用 所属分类: Lisp/Scheme 、我的SICP答案

评论

# re: 我的SICP习题答案（1.9）  回复  更多评论   

请问我这样转载你的东西可以吗？
http://guava.javaeye.com/admin/blogs/356786
2009-03-28 20:50 | guava

# re: 我的SICP习题答案（1.9）  回复  更多评论   

@guava

呵呵
2010-02-19 21:01 | cuigang

只有注册用户登录后才能发表评论。
网站导航: 博客园   IT新闻   BlogJava   博问   Chat2DB   管理