2008-07-06から1日間の記事一覧

problem 34

Problem 34 - Project Euler各桁の数字の階乗の和ともとの数が等しい数の総和を求める問題。 (define (fact n) (define ht (make-hash-table)) (if (hash-table-exists? ht n) (hash-table-get ht n) (let loop ((i n) (m 1)) (if (= i 0) (begin (hash-tabl…

problem 24

Problem 24 - Project Euler0 から 9 までの数字の順列を辞書順に並べたとき、1000000 番目の数字は何か?という問題。確率統計にありがちな問題です。 pen and paper で 考えてたら紙と鉛筆で解いてしまった。以下その時のメモ: permutation-table: 9! = 3…