For ... Next es un método para ejecutar un bloque de sentencias un número fijo
de veces.
El
ciclo for se diferencia del ciclo while, en que las
operaciones de control del ciclo se sitúan en un solo sitio: la
cabecera de la orden
Sintaxis
...
{ordenes}
...
Funcionamiento
del For
1. Evalúa
la condición, si es verdadera entra al ciclo: variable=Expression
2. Ejecuta
el o las ordenes: {ordenes}
4.Incrementa
o decrementa, dependiendo del valor ExpressionStep, el valor de la Variable y regresa al punto 1
'Mostrar
los 30 primeros números de la serie de Fibonacci. La serie es
1,1,2,3,5,8,13....
Dim
a As
Integer
=
1
Dim
b As
Integer
=
1
Dim
i As
Integer
Dim
fibo As
Integer
Print
"Mostrar
los 30 primeros números de la serie de Fibonacci."
For
i =
3
To
31
fibo
=
a +
b
Print
fibo
a
=
b
b
=
fibo
Next
Ejemplo
II: Sumar todos los números nones desde 1 hasta 30
Dim
num, suma As
Integer
=
0
Print
"Sumar
todos los numeros impares, del 1 al 30"
For
num =
1
To
30
Step
2
suma
+=
num
Print
"Suma
de nones:"; suma
Next
Ejemplo III: Sumar todos los numeros pares desde el 2 al 40
Dim
num, suma As
Integer
=
0
Print
"Sumar
todos los numeros pares, del 2 al 40"
For
num =
0
To
40
Step
2
suma
+=
num
Print
"Suma
de pares:";
suma
Next
Descarga de los ejemplo: Enlace
Enlace a la documentación:
http://gambaswiki.org/wiki/lang/for
No hay comentarios:
Publicar un comentario