import Control.Monad
import Data.Maybe (fromJust)
import Data.List as List


isVowel :: String -> Bool
isVowel "a" = True
isVowel "i" = True
isVowel "u" = True
isVowel "e" = True
isVowel "o" = True
isVowel _ = False

solve :: String -> String
solve s
    | (isVowel s) = "vowel"
    | otherwise = "consonant"

main :: IO()
main = do
    c <- getLine
    putStrLn $ solve c