(defn tmp3
  [acoll]
  (loop [a (rest acoll), counter 0, acc [(first acoll)]]
    (if-let [f (first a)]
      (recur (rest a)
             (inc counter)
             (if (even? counter)
               (vec (cons f acc))
               (conj acc f)))
      (->> (if (even? counter)
             (reverse acc)
             acc)
           (interpose " ") (apply str)))))


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