June 2018 Update

2018-06-22 20:57:24 +00:00 · 2018-06-22 20:57:24 +00:00 · 22f33d4004
commit 22f33d4004
parent ba8067c3b7
5278 changed files with 84726 additions and 14379 deletions
--- a/Task/FizzBuzz/Clojure/fizzbuzz-4.clj
+++ b/Task/FizzBuzz/Clojure/fizzbuzz-4.clj
@ -1,6 +1 @@
-(def fizzbuzz (map
-  #(cond (zero? (mod % 15)) "FizzBuzz"
-         (zero? (mod % 5)) "Buzz"
-         (zero? (mod % 3)) "Fizz"
-               :else %)
-  (iterate inc 1)))
+(map #(let [s (str (if (zero? (mod % 3)) "Fizz") (if (zero? (mod % 5)) "Buzz"))] (if (empty? s) % s)) (range 1 101))