Imports System

'REALIZADO POR: JUAN PORRAS

'EJEMPLO IF ANIDADO

'INDICA SI UN NUMERO ES POSITIVO, NEGATIVO O CERO

Public Module Module1

    Public Sub Main()

        DIM NUMERO AS INTEGER

        Console.WriteLine("EJEMPLO IF ANIDADO")

        CONSOLE.WriteLine("INGRESE UN NUMERO")

        NUMERO = CONSOLE.ReadLine()

        IF NUMERO > 0 THEN

            CONSOLE.WriteLine("EL NUMERO ES POSTIVO")

        END IF

            IF NUMERO < 0 THEN

                CONSOLE.WriteLine("EL NUMERO ES NEGATIVO")

        END IF

            IF NUMERO = 0 THEN

                    CONSOLE.WriteLine("ES CERO")

        END IF

    End Sub

End Module