main = do s <- getLine let (_, r) = head $ filter (\(c, _) -> c == '?') $ zip s "yukicoder" putStrLn [r]