SLE_Practica56_AlumnosCalif_Mejorado

/* Los 15 alumnos de una materia están formados para ser atendidos para la revisión
   de su calificación por parte de su profesor quien a su vez va formando a sus alumnos
   en dos filas con base a su calificación obtenida (aprobados y reprobados).
   Utilizando las operaciones de una cola estática desplegar las dos filas de reprobados y aprobados.
   En la inserción de datos de cada alumno pedir su nombre y calificación.
*/


var
    alumno: registro
    {
    nombre: cadena
    calificacion: numerico
    }

   // cola_aprobados, cola_reprobados: vector [15] Alumno
   cola_aprobados: vector[15] registro
    {
    nombre: cadena
    calificacion: numerico
    }
cola_reprobados: vector[15] registro
                    {
        nombre: cadena
        calificacion: numerico
              }
    frente_aprobados, final_aprobados, frente_reprobados, final_reprobados: numerico
    i: numerico
    //alumno: Alumno

inicio
    // Inicializar las colas
    frente_aprobados = 1
    final_aprobados = 1
    frente_reprobados = 1
    final_reprobados = 1

    // Insertar datos de los 15 alumnos
    desde i=1 hasta 15 {
        imprimir("\nIntroduce el nombre del alumno ", i, ": ")
        leer(alumno.nombre)
        imprimir("\nIntroduce la calificación del alumno ", i, ": ")
        leer(alumno.calificacion)

        si (alumno.calificacion >= 60) {
            // Insertar en la cola de aprobados
            si (final_aprobados < 15) {
                final_aprobados = final_aprobados + 1
                cola_aprobados[final_aprobados] = alumno
            sino
                imprimir("\nLa cola de aprobados está llena.")
            }
        sino
            // Insertar en la cola de reprobados
            si (final_reprobados < 15) {
                final_reprobados = final_reprobados + 1
                cola_reprobados[final_reprobados] = alumno
            sino
                imprimir("\nLa cola de reprobados está llena.")
            }
        }
    }

    // Desplegar la cola de aprobados
    imprimir("\n\nAlumnos aprobados:")
    desde i=1 hasta final_aprobados {
        imprimir("\nNombre: ", cola_aprobados[i].nombre, " - Calificación: ", cola_aprobados[i].calificacion)
    }

    // Desplegar la cola de reprobados
    imprimir("\nAlumnos reprobados:")
    desde i=1 hasta final_reprobados {
        imprimir("\nNombre: ", cola_reprobados[i].nombre, " - Calificación: ", cola_reprobados[i].calificacion)
    }
fin