PseInt_Practica20_PromedioAlumnos

Proceso practica30_PromediosAlumnos
    // Calcular el promedio de 10 alumnos los cuales tienen 7 calificaciones cada uno en
    // la materia de Estructura de Datos.

    alumnos <- 0
    contador <- 0
    calificacion <- 0
    suma_calif <- 0
    suma_global <- 0
    promedio_alumno <- 0
    promedio_general <- 0

    Escribir "A continuacion dame las 7 calificaciones de 10 alumnos";
    Para alumnos <- 1 Hasta 10 Hacer
        Para contador<-1 Hasta 7 Hacer
            Escribir "Calificacion",contador," del alumno",alumnos;
            Leer calificacion
            suma_calif <- suma_calif + calificacion
        FinPara
        promedio_alumno <- suma_calif / 7
        Escribir "El promedio de calificacion del alumno es: ", promedio_alumno
        suma_global <- suma_global + promedio_alumno
    FinPara
    promedio_general <- suma_global / 10
    Escribir "El promedio general del grupo fue de: ", promedio_general
FinProceso