(defn quick-sort [xs]. (if (empty? xs). []. (let [head (first xs) tail (rest xs)]. (concat. (quick-sort (filter #(<= % head) tail)).
確定! 回上一頁