main::IO()
main = do
  n<-fmap read getLine
  getLine
  xs<-fmap (fmap read) . sequence . take n . repeat $ getLine
  print . ceiling $ maximum xs - minimum xs