(defn tmp2
  [acoll]
  (loop [a acoll, counter, 0 odd-l [], even-l []]
    (if-let [f (first a)]
      (recur (rest a)
             (inc counter)
             (if (odd? counter)  (conj odd-l f) odd-l)
             (if (even? counter) (conj even-l f) even-l))
      (do
        (let [coll (if (even? (count acoll))
                     (concat (reverse odd-l) even-l)
                     (concat (reverse even-l) odd-l))]
          (->> coll (interpose " ") (apply str)))))))





(let [n (-> (line-seq (java.io.BufferedReader. *in*))
            first)
      a (-> (line-seq (java.io.BufferedReader. *in*))
            first)]
  (println (tmp2 (clojure.string/split a #" "))))
