今日はファイルの読み込みのみ。 Scheme 入門 9. 入出力にあるコードを読み解く。 > (define (read-file file-name) ;関数の定義 (let ((p (open-input-file file-name))) ;p変数に入出力ポートを設定 (let loop((ls1 '()) (c (read-char p))) ;名前つきlet…