import Control.Applicative

main = do
    x <- fmap (read :: String -> Int) . words <$> getLine
    h1 <- return $ head x
    h2 <- return $ x !! 1
    putStrLn $ show(h1 * h2) ++ " " ++ show(2 * h1 + 2 * h2)