Module Module1

    Sub Main()

        Dim N As Integer = Console.ReadLine()
        Dim tmp() As String = Split(Console.ReadLine())

        Dim a(N) As Integer

        Dim c As Integer

        For c = 0 To N - 1
            a(CInt(tmp(c)) - 1) = c + 1
        Next

        For c = 0 To N - 1
            Console.Write(a(c) & " ")
        Next

        'Console.Read()

    End Sub

End Module
