main = do 
    [w, h, x, y] <- map (read :: String -> Int). words <$> getLine
    let s = w * h 
    let s2 = ( fromIntegral s ) / (2::Float)
    let b = ((2*x) == w) && ((2*y) == h)
    putStrLn $ (show s2) ++ " " ++ if b then "1" else "0"