Skip to content

Instantly share code, notes, and snippets.

@kalisjoshua
Created March 12, 2014 20:52
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save kalisjoshua/9516025 to your computer and use it in GitHub Desktop.
Save kalisjoshua/9516025 to your computer and use it in GitHub Desktop.
Haskell Project Euler #1
{-
If we list all the natural numbers below 10 that are multiples of
3 or 5,we get 3, 5, 6 and 9. The sum of these multiples is 23.
Find the sum of all the multiples of 3 or 5 below 1000.
-}
main =
print (sum [x | x <- [1..999], mod x 5 == 0 || mod x 3 == 0])
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment