gistfile1.clj

(require '[clojure.string :as str])

(defn SplitStringToList
  [input_string]
   (map read-string (str/split input_string #" "))
 )

(defn MinInSlice
  [[start end] widths]
    (apply min (drop start (take (+ 1 end) widths)))
  )

(def input_lines (read-line))
(def input_widths (SplitStringToList (read-line)))

(doseq [x (range (read-string input_lines))]
  (def range_list (SplitStringToList (read-line)))
  (println (MinInSlice range_list input_widths))
 )