(defn fizzbuzz [x] (cond-> nil (zero? (mod x 3)) (str "Fizz") (zero? (mod x 5)) (str "Buzz") :always (or (str x)))) (doseq [x (range 1 101)] (prn (fizzbuzz x)))