import Text.Printf
import Control.Applicative

main = do
  ss <- (map stoi . words) <$> getLine
  let a = (ss !! 0)
      b = (ss !! 1)
  printf "%d %d" (a * b) (2 * (a + b))

stoi :: String -> Int
stoi str = read str :: Int