tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ scheme 問題1.2 (/ (+ 5 4 (- 2 (- 3 (+ 6 (/ 4 5))))) (* 3 (- 6 2) (- 2 7))) ; -37/150 4/5でもOK。 問題1.3 (define (square-3 x y z) (if (> x y) (sum-of-squares x (if (> y z) y z)) (sum-of-squares y (if (> z x) z x)))) (square-3 2 3 2) アンサーブックを見たら問題を読み間違えてたので、修正。 問題1.4 (define (a-plus-abs-b a b) ((if (> b 0) + -) a … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20070526%2F1180145799" title=" SICPを読む(4) 問題1.2 - 1.5 - ボクノス" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-05-26 11:16:39 rich https://boxnos.hatenablog.com/entry/20070526/1180145799 1.0 100%