Guest User

Untitled

a guest
Feb 27th, 2012
32
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.16 KB | None | 0 0
  1. import System.IO
  2.  
  3. main = do
  4. putStrLn $ show $ sum $ filter judge [1..999]
  5.  
  6. judge a | a `mod` 3 == 0 || a `mod` 5 == 0 = True
  7. | otherwise = False
Add Comment
Please, Sign In to add comment