Imports System

Public Module Module1

    Public Sub Main()

        DIM A, B, C AS INTEGER 

        Console.WriteLine("INGRESE UN NUMERO: ")

        A = CONSOLE.ReadLine()

        CONSOLE.WriteLine("INGRESE OTRO NUMERO: ")

        B = CONSOLE.ReadLine()

        Console.WriteLine("INGRESE OTRO NUMERO: ")

        C= CONSOLE.ReadLine()

        IF A>B>C THEN 

            'CONSOLE.Writeline("A ES EL MAYOR")

            CONSOLE.WriteLine(" EL MAYOR ES: " &A)

        END IF

        IF B>A>C THEN

            CONSOLE.WriteLine("B es el mayor ")

        END IF

        IF C>B>A THEN

            CONSOLE.WriteLine("C ES EL MAYOR ")

        END IF

​

    End Sub

End Module