SLE_Practica44_AgendaPersonal

/* Elabora un algoritmo que asigne memoria dinámica a un arreglo de N estructuras
   o registros de tipo Agenda_Personal e imprima dichos datos

*/


var
    agenda: vector[*] registro
        {
            nombre: cadena
            telefono: cadena
            correo: cadena
        }

    //agenda: puntero Agenda_Personal
    N, i: numerico

inicio
   cls()
    // Leer el tamaño de la agenda
    imprimir("\nIntroduce el número de entradas en la agenda: ")
    leer(N)
     dim (agenda, N)

    // Asignar memoria dinámica para la agenda
    //agenda  nuevo vector [N] Agenda_Personal

    // Leer los datos de cada entrada de la agenda
    desde i=1 hasta N {
        imprimir("\nIntroduce el nombre de la entrada ", i, ": ")
        leer(agenda[i].nombre)
        imprimir("\nIntroduce el teléfono de la entrada ", i, ": ")
        leer(agenda[i].telefono)
        imprimir("\nIntroduce el correo de la entrada ", i, ": ")
        leer(agenda[i].correo)
    }

    // Imprimir los datos de la agenda
    imprimir("\n============================= \nDatos de la agenda: \n================================")
    desde i=1 hasta N {
        imprimir("\n\nEntrada ", i, ":")
        imprimir("\nNombre: ", agenda[i].nombre)
        imprimir("\nTeléfono: ", agenda[i].telefono)
        imprimir("\nCorreo: ", agenda[i].correo)
    }

fin