Skip to content

Instantly share code, notes, and snippets.

@marionette-of-u

marionette-of-u/fizzbuzz.clj

Created August 15, 2012 04:25
Show Gist options
  • Save marionette-of-u/3355875 to your computer and use it in GitHub Desktop.
Save marionette-of-u/3355875 to your computer and use it in GitHub Desktop.
Download ZIP
しゅくだい
Raw
fizzbuzz.clj
(defn fizzbuzz [curr n]
(if (= curr n)
((print "end...\n")
(0))
((if (= (mod curr 15) 0)
(print "fizzbuzz,")
(if (= (mod curr 3) 0)
(print "fizz,")
(if (= (mod curr 5) 0)
(print "buzz,")
(printf "%s," curr))))
(fizzbuzz (+ curr 1) n))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment