(defun main ()
  (let* ((n (read))
         (xs (loop repeat n collect (read)))
         (ma (- (car (last xs)) (car xs)))
         (mi (loop for (a1 a2) on xs
                   while a2
                   minimize (- a2 a1))))
    (princ mi)
    (terpri)
    (princ ma)
    (terpri)))
(main)