{-# LANGUAGE ScopedTypeVariables #-}

import Control.Applicative
main = do
    [a,b]::[Int] <- map read . words <$> getLine
    putStr $ show $ product[a,b]
    putStr " "
    putStrLn $ show $ (sum[a,b])*2