Ver Mensaje Individual
  #1  
Antiguo 20-11-2004
Luli Luli is offline
Miembro
 
Registrado: oct 2004
Posts: 76
Reputación: 20
Luli Va por buen camino
Lightbulb Manejo de listas

hola, tengo que aprender a manejar listas, si otra vez con las listas, es que no me ha quedado claro, bueno ahi va: encontré un ejemplo de listas enlazadas, de las simples no dobles, pero no se si estoy entendiendo bien, lo que estoy preguntando hasta ahora es lo como me imagino que funciona el programa pero quiero asegurarme para asi poder aprender, así que en las lineas de codigo que tengo duda insertaré una pregunta va? a ver si me pueden ayudar...


type

TApunt=^TNodo;
TNodo=record
Info: String;
Liga: TApunt;
end;

var
Inicio, Fin: TApunt; // aqui declaro las variables de tipo apuntador, pues cuando lo hago, ¿ya apuntan a nil?
  • procedure Agregar(Elem: String);
    Var Aux: TApunt; // Aux es un apuntador al nodo que se creará?
    begin
    New(Aux); // aqui, el nodo se puede llamar de otro modo, por ejemplo p? es decir que fuera: New(p);
    Aux^.Liga:=Nil;
    Aux^.Info:=Elem;
    if Inicio=Nil then Inicio:=Aux // aqui, con Inicio:=Aux digo que inicio apunta a aux?
    else Fin^.Liga:=Aux;
    Fin:=Aux; //por lo tanto, aqui digo que fin apunta a aux...
    end;
Por el momento es todo, muchas gracias
Responder Con Cita