Problem 9

Problem 9です。

「a + b + c = 1000となるピタゴラスの三つ組が一つだけ存在する. このa,b,cの積を計算しなさい」こんな問題ですね。

pythaNums n = [a * b * c | a <- [1 .. n `div` 3], b <- [a+1 .. n `div` 2], c <- [n - a - b], a * a + b * b == c * c]

main = print . head . pythaNums $ 1000

こんな感じにやってみました。

ごめんなさい

Problem 8を忘れてました。

でも日付変わる前に更新したいのでProblem 8は次回で…