WHILE- NEXT

Esta estructura permite repetir N veces la operacion mientras sea verdadera.


Ejercicios:

1.Elaborar un programa que me muestre la serie de los 9 primeros numeros enteros.

Module Module1
Dim num As Integer = 1
Sub Main()
While (num < 9)
Console.WriteLine(num)
num = num + 1
End While
Console.ReadLine()
End Sub
End Module

2. Elaborar un programa que me muestre la serie de los 25 primeros numeros pares.

Module Module1
Dim num As Integer = 2
Sub Main()
While (num < 25)
Console.WriteLine(num)
num = num + 2
End While
Console.ReadLine()
End Sub
End Module

3. Elaborar un programa que me muestre la serie de los 12 primeros numeros enteros.

Module Module1
Dim num As Integer = 1
Sub Main()
While (num < 12)
Console.WriteLine(num)
num = num + 1
End While
Console.ReadLine()
End Sub
End Module