リスト リストに添字でアクセスするのは、なんかイヤな気分になるんだけど、まあしょうがない。 (define (create-list) '(list)) (define (insert! target index val) (if (> index 1) (insert! (cdr target) (- index 1) val) (let ((new (cons val (cdr ta…