module Main where

import           Data.Char
import           Data.Maybe                     ( fromJust )
import qualified Data.ByteString.Char8         as BS


bytestr2Int = fst . fromJust . BS.readInt
getInt = bytestr2Int <$> BS.getLine
getIntLH = map bytestr2Int . BS.words <$> BS.getLine
getIntLV n = replicate n $ getInt
getInt2D n = replicate n $ getIntLH


main :: IO ()
main = do
    n  <- getInt
    ss <- getLine
    print $ map (shift n) ss

shift :: Int -> Char -> Char
shift n c = toEnum $ if r < 91 then r else r - 26 where r = (+ n) $ ord c


