练习2.4 2.5

原创 2016年05月31日 18:05:27
#lang racket
#|
;: 练习2.4
(define (cons x y)
  (lambda (m) (m x y)))

(define (car z)
  (z (lambda (p q) p)))

(define (cdr z)
  (z (lambda (p q) q)))

(define z (cons 'a 'b))
z
(car z)
(cdr z)

|#

;: 练习 2.5
(define (cons a b)
  (* (expt 2 a)
     (expt 3 b)))
;:
(define (car z)
  (if (= 0 (remainder z 2)) ;: 整除则+1
      (+ 1 (car (/ z 2)))
      0))
;:
(define (cdr z)
  (if (= 0 (remainder z 3))
      (+ 1 (cdr (/ z 3)))
      0))
;: 测试
(define z (cons 9 8))
(car z)
(cdr z)

版权声明:知行合一

相关文章推荐

sicp 练习2.4

sicp 练习2.4 解释 将展现scheme(或者lisp)的最精髓之处:1.过程(函数)可以作为参数,这早已知晓。2.值也可以是函数!!

Java枚举类型的使用举例2

下面的代码经本人测试,望对Java枚举类型不解的人有所帮助。 /** * This class presents a application of the enum(枚举) class. ...

1212全民疯抢 冰贝韩版修身条纹装饰假两件长款棉衣加厚外套BK927

促销价格 : 470.0 元 掌柜 : 冰贝服饰旗舰店 信用 : 30天累计售出 : 件 宝贝与描述相符 : 4.6低于1.15% 卖家的服务态度 : 4.7持平-------- 卖家发...

1212全民疯抢 冰贝韩版修身条纹装饰假两件长款棉衣加厚外套BK927

促销价格 : 470.0 元 掌柜 : 冰贝服饰旗舰店 信用 : 30天累计售出 : 件 宝贝与描述相符 : 4.6低于1.15% 卖家的服务态度 : 4.7持平-------- 卖家发...

一道小米的笔试题

c语言的笔试题,关于数组,目标是最优性能。

数据结构与算法分析Java版练习2.3,2.4,2.5,2.6和2.7

dynamic web module 2.5与2.4

http://hi.baidu.com/yuanygb/blog/item/b7f89b54c1638045d0090642.html Project facet Dynamic Web Modul...

Spring2.5学习2.4_Spring如何装配各种集合类的属性

例如set集合,list集合,map集合,properties集合我们如何注入呢? private List list = new ArrayList(); private Set sets = ...

hadoop 2.4.x 2.5.x 源码编译指南

操作系统:ubuntu 14.04 安装步骤: 安装g++,在安装protocol buffer的时候需要g++,而ubuntu系统默认安装完成后没有安装g++,安装命令如下: ...

2.4升级2.5问题-我的工作

打开主界面,点击“我的工作” 抛出以下异常:20:29:06,421 INFO AbstractDocStaticTblDAO:2333 - MS SQL Server: SELECT TOP 10...
  • lejuo
  • lejuo
  • 2011-06-26 20:42
  • 1110
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)