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

(defn get-int-coll []
  (map read-string (str/split (read-line) #"\s")))

(defn gacchanko [coll0 coll1]
  (partition 2 (interleave)))

(println
  (let [_ (read)
        v (get-int-coll)
        c (get-int-coll)]
        (apply + (map (apply -) (gacchanko v c)))))