mirror of
https://github.com/janet-lang/janet
synced 2024-11-04 15:56:17 +00:00
14 lines
263 B
Plaintext
14 lines
263 B
Plaintext
# A simple fizz buzz example
|
|
|
|
(defn fizzbuzz
|
|
"Prints the fizzbuzz problem."
|
|
[]
|
|
(for [i 1 101]
|
|
(let [fizz (zero? (% i 3))
|
|
buzz (zero? (% i 5))]
|
|
(print (cond
|
|
(and fizz buzz) "fizzbuzz"
|
|
fizz "fizz"
|
|
buzz "buzz"
|
|
i)))))
|