5 lines
125 B
Haskell
5 lines
125 B
Haskell
main :: IO()
|
|
main = do
|
|
print (sum multiples)
|
|
where
|
|
multiples = [x | x <- [3..999], (mod x 3 == 0) || (mod x 5 == 0)]
|