Imports System

Public Module mayoria

    'algoritmo que detemina si una persona es mayor o menor de edad.

    Public Sub Main()

        Dim Edad as integer

        Dim Nombre, Mensaje As string

        Edad= 0

        Nombre = ""

        Mensaje = ""

        console.WriteLine("¿cual es su nombre?")

        Nombre = console.ReadLine()

        console.WriteLine("¿cual es su edad?")

        Edad= Console.ReadLine()

        if edad< 18 then 

            Mensaje = "MENOR DE EDAD"

        Else

            Mensaje = "MAYOR DE EDAD"

        End if 

        console.WriteLine("{0}, usted es{1}", Nombre, Mensaje)

        Console.Readline()

    End Sub

End Module