SHARE
TWEET

Untitled

a guest Feb 27th, 2012 19 Never
  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
RAW Paste Data
Top