import Control.Applicative ((<$>), (<*>))
import Data.List

main :: IO ()
main = do
  solve <$> readLn <*> getl (map read . words) >>= putStrLn . intercalate " " . map show

solve :: Int -> [Int] -> [Int]
solve n as = tsurukame n (sum as `div` (n - 1))

tsurukame h l = let t = (4 * h - l) `div` 2 in [t, h - t]
  
getl :: (String -> a) -> IO a
getl f = f <$> getLine