(def n (read-string (read-line))) (def xs (mapv read-string (clojure.string/split (read-line) #"\s"))) (def ss (sort xs)) (def diffs (map #(Math/abs (long (- %1 %2))) ss (rest ss))) (println (apply min diffs))