main = getLine >>= print . solve . map read . words

solve :: [Integer] -> Integer
solve [r, c]
	| odd r && odd c = (r * c) `div` (if r == c then 4 else 2)
	| otherwise = div (r * c) (if r == c then 4 else 2) - 1