FOR - NEXT

Es una estructura repetittiva comienza desde hasta hacia.


Ejercicios:

1.Elaborar un programa que me muestre la serie de los 18 primeros numeros enteros de forma decreciente.

Module Module1
Dim cont As Integer
Sub Main()
For cont = 0 To 17
Console.WriteLine(18-cont)
Next
Console.ReadLine()
End Sub
End Module

2.Elaborar un programa que me muestre los primeros 22 numeros enteros.

Module Module1
Dim cont As Integer
Sub Main()
For cont = 1 To 22
Console.WriteLine(cont)
Next
Console.ReadLine()
End Sub
End Module

3.Elaborar un programa que me muestre la palabra aprobada 13 veces.

Module Module1
Dim cont As Integer
Sub Main()
For cont = 1 To 13
Console.WriteLine("aprobada")
Next
Console.ReadLine()
End Sub
End Module