練習問題2.1 正と負の両方の引数を扱うことができる改良版make-rat を定義せよ。make-rat は符号を正規化し、正の有理数であれば分子と分母の両方が正となり、負の有理数であれば分子のみが負になるようにする。 (define (numer x) (car x)) (define (denom …

読んでるpdf github.com 練習問題1.29 (define (sum term a next b) (if (> a b) 0 (+ (term a) (sum term (next a) next b)))) (define (sympthon f a b n) (define h (/ (- b a) (* n 1.0))) (define (sympthon-term x) (+ (* 2.0 (f x)) (* 4.0 (f (+ x h…

読んでるpdf github.com 練習問題1.17 対数時間で掛け算を定義せよ(再帰的に) (define (fast-prod b n) (define (even? a) (= (remainder a 2) 0)) (define (double a) (* 2 a)) (define (halve a) (/ a 2)) (cond ((= n 0) 0) ((even? n) (double (fast-pro…