100 likes | 215 Views
List á k , Vermek és Várakozási Sorok. Várakozási Sor. Def: Egy sajátos lista, amelybe a z elemek a lista egyik végén (sor vége) szúrhatók be és a másik végén (sor eleje) törölhetőek.
E N D
Várakozási Sor Def: Egy sajátos lista, amelybe az elemek a lista egyik végén (sor vége) szúrhatók be és a másik végén (sor eleje) törölhetőek. • Ahhoz, hogy könnyen lehessen kezelni egy várakozási sort (például új elemet beszúrni vagy törölni) ismernünk kell a sor elejét és végét • A várakozási sor a hozzáférési helye következtében egy FIFO (first in firs out) adatszerkezet.
Várakozási sor : FIFO (first in firs out) Elsőnek megy 5 Elsőnek jön 6 7 Utolsóként megy 9 Utolsónak jön 23
A várakozási sorokkal végezhető műveletek • Létrehozás • várakozási sor elemeinek kiírása a sor megszűntetésével • Egy új elem beszúrása a várakozási sorba • Egy elem törlése a várakozási sorból
Létrehozás • Meg kell adnunk a verem elemszámát és beolvasni az elemeket vlamint be kell állítanunk az első és utolsó elemekre vonatkozó hivatkozásokat Write(‘n=’); Readln(n); elso:=1; utolso:=0; While utolso < n do Begin inc(utolso) readln(s[utolso]); End;
Várakozási sor elemeinek kiírása • Végigjárjuk a várakozási sort az első elemtől az utolsóig ls rendre kiírjuk az elemeket While elso<=utolso do Begin writeln(s[elso]); inc(elso); End;
Egy új elem beszúrása a várakozási sorba • Az új elemet a sor végére kell beszúrni Write(‘Uj elem erteke: ’); Readln(ertek); inc(utolso) s[utolso]):=ertek;
Egy elem törlése a várakozási sorból • várakozási sorból mindíg csak az első elem törölhető • törlés előtt ellenőrizni kell, hogy a sor nem-e üres, mivel ebben az esetben nincs mit törölni if elso <= utolso then inc(elso);
Feladat: • Írjuk progrmot amely egy várakozási sort karbantart. A program tartalmazzon egy menüt amelyből ki lehet választani a következő műveleteket: • várakozási sor létrehozása • várakozási sor elemeinek kiírása a várakozási sor megszűntetésével • Egy új elem beszúrása a várakozási sorba • Egy elem törlése a várakozási sorból • Kiléps