- 博客(2)
- 收藏
- 关注
RSS订阅原创 sicp习题答案和范例代码 - 第二章 2.1
2.1.1 范例 2.1 习题 (define (make-rat n d) (cond ((< 0 (* n d)) (cons (abs n) (abs d))) ((= 0 d) "divides 0") (else (cons (- (abs n)) (abs d))))) (define (numer x) (car x
2013-10-15 02:10:38
618
原创 sicp习题答案和范例代码 - 第一章
第一章未整理，先放到这里 ;; ex1.3 (define (sq x) (* x x)) (define (greater-two-sqrt-sum a b c) (let ((x (min a b c))) (cond ((= x a) (+ (sq b) (sq c))) ((= x b) (+ (sq a) (sq c)))
2013-10-15 02:06:01
539
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人