パタリロ!―選集 (1) (白泉社文庫)作者: 魔夜峰央出版社/メーカー: 白泉社発売日: 1994/09/01メディア: 文庫購入: 2人 クリック: 3回この商品を含むブログ (11件) を見る

今回は素数の問題ひたすら除数を見つける関数 (define (smallest-divisor n) (find-divisor n 2)) (define (find-divisor n div) (cond ((> (* div div ) n) n) ((isdivides div n) div) (else (find-divisor n (+ div 1))))) (define (isdivides a b) (= (r…