RosettaCodeData/Task/FizzBuzz/Clojure/fizzbuzz-11.clj

5 lines
169 B
Clojure
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(take 100
(map #(if (pos? (compare %1 %2)) %1 %2)
(map str (drop 1 (range)))
(map str (cycle ["" "" "Fizz"]) (cycle ["" "" "" "" "Buzz"]))))