問題3.16 最初の count-pairs を実行する際に、カウント1。 (car x) と (cdr x) のそれぞれのポインタが指し示す先が対（pair）である場合に、カウント1。 ポインタの指し示す先が同じ場合に count-pairs が重複して実行される。 (define (count-pairs x) (if (not (pair? x)) 0 (+ (count-pairs (ca…続きを読む

問題3.15 set-to-wow! を実行前と実行後の箱とポインタ図。 (define x (list ‘a ‘b)) (define z1 (cons x x)) (define z2 (cons (list ‘a ‘b) (list ‘a ‘b))) (define (set-to-wow! x) (set-car! (car x) ‘wow) x) (display z1) gosh&gt…続きを読む