2009-05-30から1日間の記事一覧
このシリーズって海外にもあるんだね。 ニコニコにいるヒトラーはダメ人間ばっかだけどw
http://projecteuler.net/index.php?section=problems&id=9合計が1000になるピタゴラス数の積 main = print $ (\(a,b,c) -> a * b * c) $ head $ filter isPythagoreanTriplet [(x,y,1000-x-y) | x <- [1..1000], y <- [1..x]] where isPythagoreanTriplet (…