import Control.Applicative
main :: IO ()
main = do  
 argsList <- words <$> getLine
 let a = argsList !! 0
     b = argsList !! 1
     area = read a * read b :: Int 
     perimeter = read a * 2 + read b * 2 :: Int
     showStr = show area ++ " " ++ show perimeter
 putStrLn showStr 
