integer::N,K
  integer::num(10)
  read *,N
  read *,K
  read *,num(1:N)
  print '(i0)', MAXVAL(num(1:N))-MINVAL(num(1:N))
end program