- stiva

- coada

liniara dublu inlantuita

 

Liste liniare simplu inlantuite

 

Def. Este o colectie de n >= 0 noduri (elemente), in₁, in₂, …in_n aflate intr-o relatie de ordine astfel: in₁ este primul element al listei, in₂ este al doilea elem, …, in_n este ultimul element al listei.

 

O lista liniara simplu inlantuita arata astfel:

 

. . .

 

adr₁

 

- in₁, in₂, … in_n reprezinta informatiile utile (propriu-zise) a celor n noduri

(valori care se depun in HEAP)

• adr₁, adr₂, … , adr_n reprezinta adresele din zona HEAP unde se depun cele n informatii utile.

 

Lista se numeşte simplu inlantuita pentru ca fiecare element din lista contine o singura informatie

de legatura, o singura adresa şi anume adresa la care se afla urmatorul element din lista.

Avem o singura exceptie şi anume ultimul element din lista care are in campul de adresa cuvantul

NIL adica nici o adresa.

 

Cu aceasta structura dinamica se pot face operatii la fel ca şi cu alte structuri de date:

 

1. CREARE LISTA

2. LISTARE LISTA

3. ADAUGARE DE ELEMENTE IN LISTA – la inceput

• la sfarşit

• in interior

4. ŞTERGERE DE ELEMENTE DIN LISTA – la inceput

• la sfarşit

• in interior

 

 

Creare şi listare lista

Ne propunem sa creem o lista formata din n nr reale.

 

 

Daca fiecare element al listei cuprinde inf. utila şi o adresa => ca fiecare elem din lista este de fapt o inregistrare (record).

 

Program creare_listare_lista;

Type

ref = ^inr;

inr = record

elem:real;

adrurm:ref;

end;

VAR

n, i : integer;

c, prim, ultim : ref;

BEGIN

write(‘n= ‘); readln(n);

new(c);

write(‘dati val elem ‘); readln(c^.elem);

prim := c;

ultim := c;

for i := 2 to n do begin

new(c);

write(‘mai introduceti o val: ‘); readln(c^.elem);

ultim^.adrurm := c;

ultim := c;

end;

ultim^.adrurm := nil;

AlistareS

c := prim;

while c <> nil do begin

write(c^.elem,’ ‘);

c:=c^.adrurm;

end;

END.