tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme 久しぶりにリスト修行をしよう。 約数 今回のテーマは約数にした。wikipediaによると、約数 - Wikipedia 50 の正の約数は 1, 2, 5, 10, 25, 50 の 6 個 おぉ、リスト向き!!と思ったので、修行してみる。 再帰で 再帰で解いてみる。 (define (divisor n) (define (iter m) (cond ((> m n) '()) ((= (modulo n m) 0) (cons m (iter (+ m 1)))) (else (iter (+ m 1))))) (iter 1)) 1があって、割り切れるので置いとく。 2があって、割り切… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20071213%2F1197492945" title=" リスト修行 約数のリストを求める - ボクノス" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-12-13 05:55:45 rich https://boxnos.hatenablog.com/entry/20071213/1197492945 1.0 100%