2008-12-08から1日間の記事一覧

証明、いや照明の力

身近な人がTVにでてた。 10歳くらい若く見えた。 あんなに変わるもんなんですねぇ。

Problem 142

http://projecteuler.net/index.php?section=problems&id=142 悪いコードである。最小性の保証?何それ、食べられるの? import Control.Monad import Data.List isSqrt n = (n==).(^2).sqrt'$n sqrt' = floor.sqrt.fromIntegral main = print.head.sort$ p1…

Problem 141

http://projecteuler.net/index.php?section=problems&id=141 とりあえず、ものすごく正直な(愚直ともいう)コード import Data.List divQuotRem n = do d <- [1..n] let (q,r) = divMod n d return [q,d,r] progressive [a,b,c] = let [x,y,z] = sort [a,b…