3 lines
78 B
Clojure
3 lines
78 B
Clojure
|
|
(defn perfect? [n]
|
||
|
|
(= (reduce + (filter #(zero? (rem n %)) (range 1 n))) n))
|