Imports System

Public Module Module1

    Public Sub Main()

        Dim n1 , n2 As Integer

        Console.WriteLine("Ingresa dos números distintos.")

        n1 = Console.ReadLine()

        n2 = Console.ReadLine()

        If ( n1 > n2 ) Then 

            Console.WriteLine ("El número mayor es: " & n1)

            End If

        If (n1 < n2 ) Then

            Console.WriteLine ("El número mayor es: " & n2)

        End If

    End Sub

End Module