import Control.Applicative import Control.Monad import Data.Char import Data.List f k = chr . (+ ord 'A') . (`mod` 26) . subtract k . subtract (ord 'A') . ord main = getLine >>= putStrLn . zipWith f [1..]