(def n (Long/parseLong (read-line))) (def xs (map #(Long/parseLong %) (clojure.string/split (read-line) #"\s"))) (def freq (sort (frequencies xs))) (def ans (first (reduce (fn [[_ n1 :as old] [d n2]] (if (> n2 n1) [d n2] old)) [1 0] freq))) (println ans)