반응형
연습문제1.10

> (define (A x y)
    (cond ((= y 0) 0)
          ((= x 0) (* 2 y))
          ((= y 1) 2)
          (else (A (- x 1)
                   (A x (- y 1))))))
> (A 1 10)
1024
> (A 2 4)
65536
> (A 3 3)
65536
>

(f n) = 2n
(g n) = 2^n
(h n) = 2^2...^2 (n개의 2)

연습문제 1.11
되도는 프로세스
(define (f n)
           (cond ((< n 3) n)
                 (else (+ (- n 1) ( * 2 (f (- n 2))) ( * 3 ( f (- n 3))))))))

오타 SICP 48쪽 (define ((fib n) -> (define (fib n)

반복 프로세스
> (define (g n)
    (g-iter 2 1 0 n))
> (define (g-iter a b c count)
    (if (= count 2)
        c
        (g-iter ( + a (* 2 b) (* 3 c)) (* 2 a) (* 3 b) ( - count 1))))
반응형

+ Recent posts