Project Eulerをhaskellで練習していく日記: Problem 1

問題１

https://projecteuler.net/problem=1
10未満の3か5の倍数は3,5,6,9であり、その和は23となる。
1000未満で同様の和を求めよ。

回答

prob1 n =  foldl (+) 0 [x | x<-[1..n-1], x `mod`3 == 0 || x `mod` 5 == 0]

main = do 
     print $ prob1 1000

感想

haskellの練習として、Project Eulerの問題を解いて行くことにしました。
haskellは書籍「すごいHaskellたのしく学ぼう」で勉強中です。
いきなり剰余の演算子などがするっと出てこなかったので、googleで調べたり。
あんまりエレガントなにおいがしてこないので、まだまだ練習が必要と感じました。