摘要：
;; gcd from s1.2.5(define (gcd a b) (if (= b 0) a (gcd b (remainder a b))))(define (add-rat x y) (make-rat (+ (* (numer x) (denom y)) (* (numer y) (denom x))) (* (denom x) (denom y))))(define (sub-rat x y) (make-rat (- (* (numer x) (denom y)) (* (n... 阅读全文
posted @ 2013-05-04 11:57 ASOCS 阅读(130) 评论(0) 推荐(0) 编辑