main = do
    [a, b] <- map read . words <$> getLine
    let x = area a b
        y = circumference a b
    putStrLn $ show x ++ " " ++ show y
main = do
    [a, b] <- map read . words <$> getLine
    let x = area a b
        y = circumference a b
    putStrLn $ show x ++ " " ++ show y
main = do
    [a, b] <- map read . words <$> getLine
    let x = area a b
        y = circumference a b
    putStrLn $ show x ++ " " ++ show y