import qualified Data.ByteString.Char8 as BC
import Data.Maybe (fromJust)

readInts = map (fst . fromJust . BC.readInt) . BC.words <$> BC.getLine
 
main = do
  x <- readInts
  y <- readInts
  let products = head x * head y
  let xs_mul | products `mod` 2 == 0 = "Even"
             | otherwise = "Odd"
  putStrLn xs_mul