Apúntate...


Consultas, desarrollo de programas y petición de presupuestos:

martes, 21 de agosto de 2012

While...Wend


Un ciclo while tiene una condición del ciclo, una expresión lógica que controla la secuencia de repetición.

La posición de esta condición del ciclo es delante del cuerpo del ciclo y significa que un ciclo while es un ciclo de preverificación de modo que cuando se ejecuta el mismo, se evalúa la condición antes de que se ejecute el cuerpo del ciclo.

Sintaxis
WHILE Expresión-condicion
….’instrucciones
WEND

Aquí se ejecuta el (las) orden (es) mientras la condición es verdadera; al momento de ser falsa termina el ciclo.

     Si la condición es falsa la primera vez nunca se
     ejecuta(n)  el (las) orden (es).

Ejemplos:

Ejemplo I: 
Programa que pide 10 números y calcula y muestra la suma de todos los que fueron pares.


Dim suma As Integer = 0
Dim cont As Integer = 10
Dim numero As Integer
Print "Programa que pide 10 números y calcula y muestra la suma de todos los que fueron pares."
While (cont > 0)
Print "Dame numero :"
Input numero
If numero % 2 = 0 Then suma += numero
cont -= 1
Wend
Print "Suma de numeros pares, es:", suma



Ejemplo II : Obtener el promedio de calificaciones de un grupo de 20 estudiantes


Dim total, contador, calif As Integer
Dim promedio As Float

total = 0
contador = 1
Print "Obtener el promedio de calificaciones de un grupo de 20 estudiantes"
While (contador <= 20)
Print "Dame calificacion:"
Input calif
total += calif
contador += 1
Wend
promedio = total / 20
Print "El promedio es: ", promedio

Nota:
Este bucle es ideal para usarlo cuando no sabemos cuantas veces se tienes que repetir el bucle, ya que disponemos de una comprobación para salir de él. Por ejemplo en el ejemplo 1º la condición que se comprobraba antes de repetir el bucle era: "cont > 0"

Para más información:
http://gambaswiki.org/wiki/lang/while?l=es&nh
http://gambaswiki.org/wiki/lang/wend?l=es&nh


Código fuente de los ejemplo: Ejemplos

2 comentarios:

A falta de donativos... un poco de publicidad