tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme 楽しいMIL記号の時間です。 加算器 - Wikipediaみたいなシミュレータを作っていきます。 問題 3.28 オアゲートを作れ。という問題。 (define (logical-or a b) (cond ((or (and (= a 1) (= b 1)) (and (= a 0) (= b 1)) (and (= a 1) (= b 0))) 1) ((and (= a 0) (= b 0) 0)) (else (error "Invalid signal" s)))) (define (or-gate a1 a2 output) (let ((or-action-proc (lamb… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080512%2F1210588399" title=" SICPを読む(109) 問題3.28 - 3.32 - ディジタル回路のシミュレータ - ボクノス" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/t/tanakaBox/20080512/20080512222119.jpg Hatena Blog https://hatena.blog 2008-05-12 19:33:19 rich https://boxnos.hatenablog.com/entry/20080512/1210588399 1.0 100%