Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("MAYOR Y MENOR DE TRES NUMEROS")

        DIM A, B, C AS INTEGER

        CONSOLE.WriteLine("INGRESE 3 NUMEROS")

        A = CONSOLE.ReadLine()

        B = CONSOLE.ReadLine()

        C = CONSOLE.ReadLine()

        'SI EL PRIMERO ES MAYOR QUE EL SEGUNDO, Y, EL PRIMERO ES MAYOR QUE EL TERCERO

        IF (A>B) AND (A>C) THEN

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

        END IF

        'SI EL SEGUNDO ES MAYOR QUE EL PRIMERO Y EL SEGUNDO ES MAYOR QUE EL TERCERO

        IF (B>A) AND (B>C) THEN

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

        ELSE

            'SI NO SE CUMPLEN LAS CONDICIONES EL MAYOR ES C 

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

        END IF

    End Sub

End Module