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

6 lines
159 B
Clojure

(take 100
(map-indexed
#(if (number? %2) (+ %1 %2) %2)
(cycle [1 1 "Fizz" 1 "Buzz" "Fizz" 1 1 "Fizz" "Buzz" 1 "Fizz" 1 1 "FizzBuzz"])
)
)