Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defn fizzbuzz
- [x] (
- let [fizz (= (mod x 3) 0)]
- (let [buzz (= (mod x 5) 0)])
- (if (and fizz buzz) "FizzBuzz"
- (if fizz "Fizz"
- (if buzz "Buzz")))
- )
- )
- (map fizzbuzz (range 100))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement