LPP_Practica25_CapturaAlumnos

/* Practica35_CapturaAlumnos
Hacer un programa para una escuela, el cual almacene el nombre, direccion, telefono, semestre, grupo y matricula de 100 alumnos */

//Declaracion de variables
registro est_alumnos
    cadena[20] nombre
    cadena[30] direccion
        Entero telefono
    Entero semestre
    cadena[15] grupo
    Entero matricula
fin registro
arreglo[10] de est_alumnos alumnos
Entero indice

inicio
        Llamar limpiar_pantalla()

    para indice <- 1 hasta 10 haga


    Escriba "Alumno", indice,":"
    lea alumnos[indice].nombre
    Llamar Nueva_linea

    Escriba "Direccion:"
    lea alumnos[indice].direccion

    Escriba "Telefono:"
    lea alumnos[indice].telefono

    Escriba "Semestre:"
    lea alumnos[indice].semestre

    Escriba "Grupo:"
    lea alumnos[indice].grupo

    Escriba "Matricula:"
    lea alumnos[indice].matricula

    Escriba "=============================="
    Llamar Nueva_linea
Fin para
fin