2 lines
90 B
Haskell
2 lines
90 B
Haskell
main = do
|
|
putStrLn (show (sum [x | x <- [1..999], x `mod` 3 == 0 || x `mod` 5 == 0]))
|