Instrucciones:
-
Crear un arreglo bidimensional que almacene las 4 notas de 5 estudiantes.
-
Ejemplo:
notas[5,4]
-
-
Crear un arreglo unidimensional para guardar los promedios de cada estudiante.
-
Ejemplo:
promedios[5]
-
-
Calcular el promedio de cada estudiante con la fórmula:
-
Usar un contador para saber cuántos estudiantes pasaron (promedio ≥ 6,5).
-
Usar otro contador para saber cuántos no pasaron (promedio < 6,5).
-
Imprimir en pantalla:
-
Las notas de cada estudiante.
-
El promedio de cada estudiante.
-
Al final, mostrar cuántos aprobaron y cuántos reprobaron
-
Proceso NotasEstudiantes
Definir notas Como Real
Dimension notas[5,4] // 5 estudiantes, 4 notas
Definir promedios Como Real
Dimension promedios[5] // Promedio por estudiante
Definir i, j Como Entero
Definir suma Como Real
Definir aprobados, reprobados Como Entero
aprobados <- 0
reprobados <- 0
// ==============================
// INGRESO DE NOTAS
// ==============================
Para i <- 0 Hasta 4 Hacer
Escribir "Estudiante ", i+1
Para j <- 0 Hasta 3 Hacer
Escribir " Ingrese nota ", j+1, ": "
Leer notas[i,j]
FinPara
FinPara
// ==============================
// CALCULAR PROMEDIOS
// ==============================
Para i <- 0 Hasta 4 Hacer
suma <- 0
Para j <- 0 Hasta 3 Hacer
suma <- suma + notas[i,j]
FinPara
promedios[i] <- suma / 4
// Contar aprobados y reprobados
Si promedios[i] >= 6.5 Entonces
aprobados <- aprobados + 1
SiNo
reprobados <- reprobados + 1
FinSi
FinPara
// ==============================
// MOSTRAR RESULTADOS
// ==============================
Escribir "====================================="
Escribir " RESULTADOS FINALES"
Escribir "====================================="
Para i <- 0 Hasta 4 Hacer
Escribir "Estudiante ", i+1
Para j <- 0 Hasta 3 Hacer
Escribir " Nota ", j+1, ": ", notas[i,j]
FinPara
Escribir " Promedio: ", promedios[i]
Si promedios[i] >= 6.5 Entonces
Escribir " Estado: APROBADO"
SiNo
Escribir " Estado: REPROBADO"
FinSi
Escribir "-------------------------------------"
FinPara
Escribir "TOTAL APROBADOS: ", aprobados
Escribir "TOTAL REPROBADOS: ", reprobados
FinProceso