main = do 
 ns <- map read . drop 2 . words <$> getContents
 print (maximum ns - minimum ns)