Ciclo For Ejemplo

Ejemplo de Ciclo for, 1

1 Ejemplo 

En un complejo industrial se desea incentivar a los encargados de turnos de producción. A cada encargado le corresponde un turno. Hay 18 turnos, y por cada uno de ellos 40 operarios. Para evaluar a los encargados se ha hecho una encuesta entre los trabajadores. Se les ha pedido que evalúen a su encargado de 0 a 10 siendo el 5 el aprobado. Los resultados están almacenados en un array tipo Nota (turno, operario) donde turno indica el número de turno y operario el número de operario dentro del turno.

Pseudocódigo

Inicio

Desde i = 1 hasta 18 Hacer

Desde j = 1 hasta 40 Hacer

Leer Nota (i,j)

Si Nota (i,j) < 5 Entonces

Haysuspensos = Verdadero

FinSi

Siguiente

 Si Haysuspensos = Falso Entonces

Mostrar “Todos los operarios del turno”, i, “han aprobado al encargado”

FinSi

 Haysuspensos = Falso

Siguiente

Fin

Diagrama de flujo

Interfaz en Visual Basic 

Codificación en Visual Basic

Botón “Calcular”

Proceso turnos

   definir x como entero;

    Para (For) x-18 hasta 40 con paso 1  hacer

           |  escribir

           |

           |

   FinPara (EndFor)

FinProceso

Botón “Borrar”

TxtEdad.Text = "-"

TxtNombre.Text ="-"

LblEncargado.Text ="-"

Botón “Salir”

End