Imports System

Public Class Program

    Public Shared Sub Main(args As String())

        Dim N As Byte = Byte.Parse(Console.ReadLine)
        Dim S() As Byte = System.Text.Encoding.ASCII.GetBytes(Console.ReadLine)


        For i As Integer = 0 To S.Length - 1
            S(i) += N
            If S(i) >= 91 Then
                S(i) -= 26
            End If
        Next

        Console.WriteLine(System.Text.Encoding.ASCII.GetChars(S))

    End Sub
End Class
