SLE_Practica25_CapturaAlumnos

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

var
    indice : numerico

    alumnos : vector [100] registro
        {
            nombre : cadena
            direccion: cadena
            telefono: numerico
            semestre: numerico
            grupo: cadena
            matricula: numerico
        }

inicio
    cls()
    desde indice = 1 hasta 10
    {
        imprimir("Alumno",indice,"\n")
        imprimir ("Nombre........:")
        leer (alumnos[indice].nombre)

        imprimir ("Direccion.....:")
        leer (alumnos[indice].direccion)

        imprimir ("Telefono......:")
        leer (alumnos[indice].telefono)

        imprimir ("Semestre......:")
        leer (alumnos[indice].semestre)

        imprimir ("Grupo.........:")
        leer (alumnos[indice].grupo)

        imprimir ("Matricula.....:")
        leer (alumnos[indice].matricula)

        imprimir ("==============================\n")
    }
fin