Lenguaje de programacion

ESTRUCTURA SELECTIVA SELECT CASE
Nos permite ejecutar un conjunto de instrucciones en función del valor de una expresión dada.
Select Case expresion.evaluar
Caseexpresion.logica1
instrucciones()
.
Case expresion.logica2
instrucciones()
.
Case expresion.logicaNinstrucciones()
.
Case Else
instrucciones()
.
End Select

Ejercicio 01
Crear un programa que compruebe si una nota es válidao no válida.

Module Module2
Sub main()
Dim nota As Byte
Console.Write("Ingrese nota: ")
nota = Console.ReadLine
Select Case nota
Case 0 To 20Console.Write("nota valida")
Case Else
Console.Write("nota no valida")
End Select
Console.ReadLine()
End Sub
End ModuleEjercicio 02
Crear una aplicación la cual nos permita ingresar una edad y nos muestre los siguientes mensajes: eres un niño (0 a 12); eres un adolescente (13 a 17); eres un adulto (>18)

ModuleModule02
Sub Main()
Dim edad As Byte
Console.Write("Ingrese edad: ")
edad = Console.ReadLine
Select Case edad
Case 0 To 12Console.Write("eres un niño")
Case 13 To 17
Console.Write("eres un adolescente")
Case Is >= 18
Console.Write("eres un adulto")
EndSelect
Console.ReadLine()
End Sub
End Module

Ejercicio 03
Crear un programa la cual nos permita mostrar el día de la semana de acuerdo a un número ingresado.

Module Module03Sub main()
Dim dia As Byte
Console.Write("Ingrese dia: ")
dia = Console.ReadLine
Select Case dia
Case 1
Console.Write("lunes")...