Project Euler Problem 1
Haskellをちょっと勉強したので、練習がてらProject Eulerを始めてみる。
まず1問目。
http://projecteuler.net/index.php?section=problems&id=1
1から999のうち、3または5の倍数の総和。FizzBuzzぽい。
main = print $ foldl (+) 0 [x | x <- [1..999], x `mod` 3 == 0 || x `mod` 5 == 0]
Haskellをちょっと勉強したので、練習がてらProject Eulerを始めてみる。
まず1問目。
http://projecteuler.net/index.php?section=problems&id=1
1から999のうち、3または5の倍数の総和。FizzBuzzぽい。
main = print $ foldl (+) 0 [x | x <- [1..999], x `mod` 3 == 0 || x `mod` 5 == 0]