import Data.Char

getInt :: [Char] -> Int -> Int
getInt  list n = digitToInt $ list !! n

main = do
	input <- getLine
	let
		a = getInt input 0
		b =  getInt input 2
	putStrLn $ show (a * b) ++ " " ++ show ((a + b) * 2)