Module Module1

    Sub Main()

        Dim ab As String
        Dim asd() As String
        Dim A As Integer
        Dim B As Integer

        Dim s As Integer

        ab = Console.ReadLine

        asd = Split(ab, " ")

        A = asd(0)
        B = asd(1)

        For i = B - (A - 1) To B + (A - 1)
            s = s & i & " "

        Next i

        Console.WriteLine(s)

    End Sub

End Module
