RosettaCodeData/Task/Loops-Continue/Clojure/loops-continue.clj

6 lines
99 B
Clojure

(doseq
[n (range 1 11)]
(do
(print n)
(if (= (rem n 5) 0) (print "\n") (print ", "))))