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