import Data.Char;

main = getLine >>= putStrLn . solve

solve = map f . zip [1..]
    where f (i, c) = chr $ (ord c - ord 'A' - i) `mod` 26 + ord 'A'