Imports System

Public Module Module1

    Public Sub Main()

        Dim Number1 As Integer = 0

        Dim Number2 As Integer = 0

        Console.Writeline( "Enter First Number")

        Number1 = Console.ReadLine()

        Console.Writeline( "Enter Second Number")

        Number2 = Console.ReadLine()

        If Number2 = Number1 Then 

            Console.Writeline("SAME")

        End If

        If Number2 > Number1 Then

            Console.Writeline("SECOND")

        End If

        If Number2 < Number1 Then

            Console.Writeline("FIRST")

        End If

    End Sub

End Module