RosettaCodeData/Task/Department-numbers/Clojure/department-numbers.clj
2023-07-01 13:44:08 -04:00

8 lines
240 B
Clojure

(let [n (range 1 8)]
(for [police n
sanitation n
fire n
:when (distinct? police sanitation fire)
:when (even? police)
:when (= 12 (+ police sanitation fire))]
(println police sanitation fire)))