■
と言うわけで、問題1.1。
まあ打ち込んだだけです。
…タイプミスしたところは削除しました(笑)。
[veleno@localhost veleno]$ gosh gosh> 10 10 gosh> (+ 5 3 4) 12 gosh> (- 9 1) 8 gosh> ( / 6 2 ) 3 gosh> (+ (* 2 4) (- 4 6)) 6 gosh> (define a 3) a gosh> (define b (+ a 1)) b gosh> b 4 gosh> a 3 gosh> ( + a b (* a b)) 19 gosh> (= a b ) #f gosh> ( if (and (> a b) (< b (* a b))) b a) 3 gosh> (cond ((= a 4) 6) ((= b 4) (+ 6 7 a)) (else 25)) 16 gosh> (+ 2 ( if ( > b a ) b a )) 6 gosh> (* (cond (( > a b) a) ((< a b) b) (else -1 )) ( + a 1)) 16 gosh>