-- Your code here!
import Data.List.Split

main = do
    ins <- getLine
    let tmp = (splitOn " " ins)
    let ab = map read tmp :: [Int]
    (putStrLn . oddEven) (foldr (*) 1 ab)

oddEven n
    | (n `mod` 2) == 1 = "Odd"
    | otherwise      = "Even"
