以下のプログラムの実行させ、なぜそうなるか考えよ。
(define (exercise-sample0 x) (let ((x 10) (y (+ x 5))) (* x y))) (define (exercise-sample1 x) (let* ((x 10) (y (+ x 5))) (* x y))) (define (exercise-1) (let ((sample0 (exercise-sample0 1)) (sample1 (exercise-sample1 1))) (= sample0 sample1))) > (exercise-1) ; 実行 #f ; 結果
99.10.6/ Tomio KAMADA: kamada@cs.kobe-u.ac.jp