RosettaCodeData/Task/FizzBuzz/Clojure/fizzbuzz-7.clj
2023-07-01 13:44:08 -04:00

6 lines
205 B
Clojure

(map (fn [n]
(if-let [fb (seq (concat (when (zero? (mod n 3)) "Fizz")
(when (zero? (mod n 5)) "Buzz")))]
(apply str fb)
n))
(range 1 101))