program W
implicit none
integer::N
integer,allocatable,dimension(:)::A
integer::ANS
integer::i
read*,N
allocate(A(N))
read*,A
ANS=huge(ANS)
do i=1,N-1
    ANS=min(ANS,A(i+1)-A(i))
end do
print"(i0)",ANS
print"(i0)",A(N)-A(1)
end program W