boxp/problem1.clj

Created June 22, 2013 14:15

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/boxp/5841027.js"></script>
Save boxp/5841027 to your computer and use it in GitHub Desktop.

Download ZIP

clojureでproject-eulerに挑戦〜第一問〜

Raw

problem1.clj

	(reduce +
	(filter
	(fn [x]
	(or (= 0 (rem x 5))
	(= (rem x 3))))
	(range 1 1001)))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment