ghc --make foo.hs -prof ./foo.exe +RTS -hc hp2ps foo.hp (fiber foo.ps)でなんか変なpsファイルができる。 みかたが良く分からないが、どうやらメモリ消費量のようなものを表しているようだ。参考： http://itpro.nikkeibp.co.jp/article/COLUMN/20070403…

http://projecteuler.net/index.php?section=problems&id=111普通の解法、同じ数が多い連続数から作って、素数かチェック。 import Number import Data.Char import Data.List toInt = read.map intToDigit :: [Int]->Integer repDigit (d+1) m (n+1) = [k:x…

http://projecteuler.net/index.php?section=problems&id=109とりあえず、再帰で書いて、DPになおそうと思った。 import Data.List score = sort$[1..20]++map (2*) [1..20]++map (3*) [1..20]++[25,50] double = map (2*) $ [1..20]++[25] finish0 n = map …