もういいかなと思ったので書きだした。したいひとはどうぞ。 MS4wNDY2fHwxNDIzNTgzMjU5MTU5OzE0MjM1ODMyNTkxNTk7MTQyNDEwMjUyODM4ODtTaGlueSBQdXBwZXR8MTExMTExMDExMDB8NTE3MjM1NjU2MjA3MC45NTU7MzUzNjY0ODcxMDQ5NjkyLjU2OzU2OTM7MTgxOzIzMTAwODQzOTI2Mi42Nj…

エジプト式分数を計算してみよう。 分数を分子が1の単位分数の和であらわすのだ。どうしても再帰で考えてしまう。しかたないんよ。 (defun egyptian-fraction (n m) (labels ((iter (n m k aux) (if (= n 0) (reverse aux) (if (< (/ n m) (/ 1 k)) (iter n …