program W
implicit none
integer::N,K
integer,allocatable,dimension(:)::ns
read*,N,K
allocate(ns(N))
read*,ns
print"(i0)",maxval(ns)-minval(ns)
end program W