[ Foro de Pascal ]

Problema con lista

11-Nov-2019 21:57
Invitado (guillermo aguilera)
0 Respuestas

Hola, estoy tratando de agregar mas de un nuevo elemento a una lista pero el problema es que al mostrar en pantalla cada elemento de la lista, solo me sale el primero, osea el resto de elementos en el final se borran.
En mi universidad me dieron este codigo:
new(p); (*crear nueva celda*)
p^.elemento:= elem; (*cargar el elemento*)
p^.siguiente:= nil; (*es el último*)
if l = nil then
l:= p
else
begin
(*busco el último de l*)
q:= l;
while q^.siguiente <> nil do
q:= q^.siguiente;
(*engancho p a continuacion del último*)
q^.siguiente:= p;
end;

que es para agregar un elemento al final de la lista, si fuera algo que se repite mas de 1 porque le estoy cargando datos nuevos, porque no funciona?




(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)