Imports System

Module Program
    Sub Main(args As String())
        Dim intN As Integer = Console.ReadLine()
        Dim tmpA As String() = Split(Console.ReadLine(), " ")

        Dim i As Integer = 0
        Dim ht As Hashtable = New Hashtable

    End Sub
End Module
