リストで構造体作るのが面倒なので、MzSchemeの構造体を試します。ドキュメントはここら辺。 PLT MzScheme: Language Manual 構造体の定義 (define-struct book (title jp-title)) ふむふむ。(define-struct 構造体名 (フィールド))。 新規作成 うはナンダコ…

なんとなく気になったので、有限ステートマシンで遊んでみた。 人工知能初体験なのでまずは挨拶から。 挨拶マシーン1号 挨拶するだけです。ハイ。 (define (good-morning) (display "Good morning.\n") hello) (define (hello) (display "Hello AI World!!\n…

今回のリスト修行のテーマはパスカルの三角形に決定〜。SICPの問題では(combination n k)→値だったのであんまり三角形っぽくなかった!!ちょっと不満だったので、リストで求めたい。 方針 パスカルの三角形n列を求めるには、前のn-1列のリストを必要とします…

名前付きletなコードを見たけど、全然意味不明だったので、10から0まで足してみる。 名前付きlet (define (sum n) (let iter ((i n) (s 0)) (if (= i 0) s (iter (- i 1) (+ i s))))) (sum 10) ; 55 どうやら、反復の簡易記法として使えるみたい。宣言部は、…