EDV Vorlesungs-sowie Übungs-und Tutoriumszusammenfassung ...

EDV Dies ist kein offizielles Skript. 

EDV 

Vorlesungs-sowie Übungs-und 

Tutoriumszusammenfassung 

Katharina Ruppel 

Inhalt: 

1. Grundlagen 

2. Algorithmen-und Prozessbeschreibung 

3. Datentypen, Datenstrukturen- und management 

Zusammenfassung von Katharina Ruppel unter wiso.ferit.info - 0 -


1.1. Grundlegende Begriffe 

Algorithmus: Ein Algorithmus ist eine eindeutige, endliche Folge von 

Elementaroperationen zur Lösung einer bestimmten Problemklasse. 

Programm: Ein Programm ist ein Algorithmus, der für ein bestimmtes 

ausführendes System(i.d.R. Rechner und Betriebssystem) implementiert 

wurde. 

Programmiersprachen: dienen zur Erstellung von Programmen, also der 

Erstellung eines gesteuerten Ablaufs von Befehlen an den Computer zur 

Lösung eines Problems/von Problemklassen. 

1.2. Compiler & Interpreter 

Ein Compiler überträgt höhere Programmiersprachen auf die 

Maschinenebene, kann die syntaktische Korrektheit einer Anweisung 

überprüfen und übersetzt zunächst alle Befehle eines Programms. 

Ein Interpreter übersetzt jeweils nur einen Befehl und führt ihn aus. 

1.3. Programmiersprachen 

Prozedurale Programmiersprachen: 

-höhere, maschinenunabhängige Programmiersprachen 

-zur Problemlösung werden Algorithmen formuliert 

Funktionale Programmiersprachen: 

-weitestgehend an die Formulierung mathematischer Funktionen 

angenäherte Programmierung 

Logische Programmiersprachen: 

-basieren auf Logik( Teilgebiet der Mathematik) 

-Behandlung von Fragestellungen wie z.B. Widerspruchsfreiheit 

mathematischer Theorien und Begriffe 

Verteilte und parallele Programmiersprachen: 

-spezielle für Aufgaben verteilte Rechner/Mehrprozessorsysteme 

Objektorientiere Programmiersprachen: 

-Klassifikation und Kapselung von Datenobjekten 



1.4. Syntax und Semantik 

Syntax: Lehre vom Satzbau, Symbole und Regeln für den Aufbau von 

Befehlen/Anweisungen, ist eine Anweisung syntaktisch korrekt oder 

nicht?, aber keine Aussage über deren Bedeutung, keinerlei 

Interpretation. Es wird lediglich überprüft, ob ein Befehl prinzipiell 

durchführbar wäre 

Semantik: Bedeutungslehre, Bestimmung der Bedeutung korrekter 

Anweisungen, keine Überprüfung durch den Compiler oder Interpreter 

2.1. Prozess oder Algorithmus 

Prozess: bezeichnet in der Informatik den Vorgang einer algorithmisch 

ablaufenden Informationsverarbeitung. 

Algorithmus: ist eine eindeutige, endliche Folge von Elementaroperationen 

zur Lösung einer bestimmten Problemklasse. 

2.2. Kontrollstrukturen 

= Schemata, die die Reihenfolge für die Abarbeitung von Anweisungen 

festlegen. 

Grundformen: 

-Sequenz 

-Schleife 

-Verzweigung 

Sequenz/Folge: ensteht durch Aneinanderreihen einzelner Anweisungen. 

Kein Überspringen oder Wiederholen , einfaches „Abarbeiten“ der 

Anweisungen eines Programms gemäß Reihenfolge. 

Anweisung 1 

Anweisung 2 

Anweisung 3 

... 

... 

EVA-Prinzip: Eingabe, Verarbeitung, Ausgabe 

Schleife/Iteration: 

Durch Wiederholung einzelner oder Gruppen von Anweisung entstehen 

Programmschleifen. 



Verzweigung/Auswahl: 

Der Ablauf des Programms kann Verzweigungen enthalten. Welcher Zweig 

ausgeführt wird, hängt von dem Ergebnis eines anzugebenden Ausdrucks 

ab. 

2.3. Struktogramme 

= genormte Darstellungsmittel für Algorithmen( auch Nassi-Schneider- 

Diagramme genannt). 

2.4. Schleifentypen 

1) Kopfgesteuerte Schleife: Wiederholung von Anweisungen mit 

vorausgehender Bedingungsprüfung (auch abweisende Schleife genannt). 

Die Schleife wird im „Extremfall“ keinmal durchlaufen. 

2) Fußgesteuerte Schleife: Wiederholung von Anweisungen mit 

nachfolgender Bedingungsprüfung. Die Schleife wird somit mindestens 

einmal durchlaufen. 

Bsp. Zu 1): Zahl 1 

Wiederhole solange Zahl< 5 

Zahl Zahl +1 

Eingabe Name 

Ausgabe ‚Hallo’ und Name 

Zu 2): Zahl 1 

Zahl Zahl +1 

Eingabe Name 

Ausgabe ‚Hallo’ und Name 

Wiederhole bis Zahl> 5 

3) Zählschleife, Schleife mit fester Wiederholungshäufigkeit 

Für 1 bis 100 

Anweisung 1 

... 

2.5. Verzweigungen ( Struktogramme dazu: siehe Folien vom Lehrstuhl 

WI) 

1) einfache Verzweigung 

bedeutet die Fortsetzung der Programmausführung in Abhängigkeit vom 

Zustand einer logischen Bedingung(boolescher Ausdruck). 

2) mehrfache Verzweigung 

Fortsetzung der Programmausführung in Abhängigkeit vom Ergebnis einer 

Bedingungsprüfung. 



2.6. Allgemein zum Struktogrammentwurf ( Bsp. 

Mittelwertberechnung) 

-konsistente/korrekte Verwendung der definierten Symbole 

-Variablen verwendet = Bezeichnungen im Sinne von „Platzhalter“ für 

Werte, nimmt unterschiedliche Werte während des Ablaufs des 

Algorithmus an 

-„reservierte“ Begriffe, z.B. SOLANGE 

-Entwicklungsspezifika, sukzessive Verfeinerung/Verbesserung (Bsp.: die 

Notwendigkeit Variablen zu initialisieren) 

2.7. Pseudocode als alternatives Darstellungsmittel (zum 

Struktogramm) für Algorithmen 

Vor-und Nachteile: 

+ einfacheres Handling 

+ leichter modifizierbar 

-stringentere Übersicht 

-schwierigere „automatische“ Transformation(Generierung) 

+- Lesbarkeit 

-Kopfgesteuerte Schleife: 

WHILE Bedingung 

DO Anweisung 

OD 

-Fußgesteuerte Schleife 

Repeat ... 

UNTIL Bedingung 

-Zählschleife 

For i = 1 to N 

Do Anweisung(en) 

OD 

-Einfache Verzweigung 

IF Bedingung 

THEN Anweisung 

ELSE ... 

FI 

-Mehrfachverzweigung 

CASE Bedingung OF 

E1: Anweisung 1 

E2: Anweisung 2 

. 

. 



EN: Anweisung N 

FO 

2.8. Exkurs Tabellenkalkulation (Excel): 

Tabellenkalkulationssystem= spread-sheet-system 

-Tabellenblatt/Arbeitsblatt hat Raster aus Spalten und Zeilen 

-Arbeitsmappe 

-Diagramme 

Zellen: 

enthalten Zahlen, Texte, Formeln 

Formeln: z.B. =D1+B2+C5 

Funktionen: 

= summe(Zahl1; Zahl2..) 

= min(Zahl 1: Zahl N) 

= max(Zahl 1: Zahl M) 

= anzahl(Zahl 1: Zahl X) 

= anzahl 2(Zelle 1: Zelle 10) für Texte, Zeichen 

= rang(zahl; Bezug(Zelle1:Zelle11)) 

Dollarzeichen für absolute Bezüge ! 

= zählenwenn(Bereich, Kriterium) 

= wenn(Bedingung, dann, sonst) 

= summewenn(Bereich, Suchkriterium) 

= und(Bedingung1; Bedingung2) 

= oder(Bedingung 1; Bedingung2) 

= Verweis(Suchkriterium; Suchvektor; Ergebnisvektor) 

2.9. Eigenschaften und Entwurfsprinzipien von Algorithmen 

1)EVA-Prinzip: bereits unter 2.2. erwähnt. Beschreibung wie Eingabedaten 

schrittweise in Ausgabedaten transformiert werden, f: E A 

Math. Formel: Relation zwischen Ausgabe und Eingabe. 

2) Abstrahierung: 

spezielle generelle Problemklasse(Probleminstanz) 

3) Determiniertheit: 

Bei gleichen Eingaben/ Startbedingungen gleiches Ergebnis, Ausnahme: 

Zufallszahlen 

4) Finitheit: 

Beschreibung des Algorithmus ist endlich. 

5) Terminierung: 



Nach endlich vielen Schritten wird der Algorithmus beendet(-> siehe 

Zählschleife) 

6) Effizienz: 

effizient, wenn ein Problem in möglichst „kurzer Zeit“ oder mit möglichst 

„geringem Aufwand“ an Betriebsmitteln( Speicherplatz) gelöst werden 

kann. 

Anzahl der Rechenschrittesiehe Thema „Sortieren von Listen“, denn 

bspw. die Suche in einer sortierten Liste ist natürlich wesentlich 

effizienter, schneller als die in einer unsortierten. 

7) Nebenläufigkeit: 

Teile von Algorithmen, die unabhängig voneinander parallel ablaufen 

können 

8) Rekursivität: 

Ein Algorithmus ruft zur Berechnung „sich selbst“ wieder auf. 

Bsp.: Fakultätsberechnung 

n! 

n*(n-1)! 

n*(n-1)(n-2)!, wobei fak(0)=1 

9) Schrittweise Verfeinerung 

10) Modularisierung: 

„divide et impera“-teile und herrsche 

Zerlegung eines komplexen Problems in Teilprobleme Prozeduren, 

Funktionen 

11) Strukturierung: 

-Darstellung der Prozeßlogik/AblauflogikStruktogramme/Verwendung 

von Kontrollstrukturen 

-Daten (siehe Folgekapitel) 

3.1. Datentypen und Datenstrukturen, Einführung 

Vordergrund: Prozesse/Algorithmen 

Daten: -Eingabeinformation über Tastatur 

-interne Zwischenergebnisse 

-Hilfsgröße für die Steuerung der Kontrollstrukturen 

-Ausgabe über Bildschirm/Drucker 



3.2. Programmierung in PASCAL 

1)Sequenz: 

Anweisung 1; 

Anweisung 2; 

Anweisung 3; 

. 

. 

. 

2) Kopfgesteuerte Schleife 

While Do Begin 

Anweisung 1; 

Anweisung 2; 

... 

end; 

3) Fußgesteuerte Schleife 

REPEAT 

Anweisung 1; 

Anweisung 2; 

... 

UNTIL ; 

End; 

4) Einfache Verzweigung 

IF Then begin 

Anweisung 1; 

Anweisung 2; 

… 

end else begin 

Anweisung 3; 

Anweisung 4; 

... 

end; 

5) Mehrfache Verzweigung 

CASE OF 

Ergebnis 1: ; 

Ergebnis 2: ; 

... 

Else 



End; 

6) Allgemeiner Aufbau eines Programms in Pascal: 

Program ; 

Const = ; 

... 

TYPE 

= ; 

VAR 

: ; 

Begin 

; 

........... 

end. 

3.3. Deklaration und Typung 

Variablendeklaration = Vereinbarung, welche Daten in einen 

Programmlauf angesprochen werden 

-Name der verwendeten Variablen 

-Festlegung eines Datentyp 

Var: ; 

-Gültigkeit der Variablen: -gesamtes Programm 

-Teilbereiche( Prozeduren, Funktionen) 

Unterscheide: Standarddatentypen selbstdefinierte Datentypen 

Datentyp = Wertebereich einer Variablen (Domänen) 

Standarddatentypen: 

Integer: ganze Zahlen 

Real: reelle Zahlen 

Boolean: Wahrheitswerte( true, false) 

Char: alphanumerische Zeichen (z.B. A) 

String: Zeichenfolge aus alphanumerischen Zeichen 

usw. 

Bsp.: Var Ende :integer; 

Summe: real; 



Deklaration eigener Datentypen: 

Type = ; 

Bsp.: Type Kleinzahl =[1,...,9]; 

-zur Einschränkung von Wertebereichen, zur Verbesserung der 

Leistungsfähigkeit( weniger Speicherplatz verbraucht) und zur 

Vermeidung von Fehlern. 

-viele selbstdefinierte Datentypen sind komplexer. 

3.4. Strukturierte Daten 

Zusammenhängende Konstrukte und Zusammenfassung 

Records = Komponenten unterschiedlicher Art 

Array(s) = Komponenten gleicher Art, x-dimensionale homogene 

Datenstruktur, die nur aus Elementen gleichen Datentyps besteht, analog 

zu Vektoren, Matrizen. 

Bsp. zu Records: Var Student = record 

Name: string; 

Alter: integer; 

Geschlecht: mw; 

End; 

Array: Var : Array[Untergrenze..Obergrenze] of 

Datentyp 

Mehrdimensionales Array: 

Matrix: Array[1..20,1..30] of Boolean 

Record mit Array: 

Type Mensch = Record 

Name: char(36) 

Noten: array[1..3] of real 

End 

Array mit Record: 

Var Studentenmenge: Array[1..100] of Student, 

Wobei Type Student= record 

Name:char; 

Matrikelnummer:char(8); 



Geburtsdatum: record 

Tag, monat, Jahr: integer 

End 

Zugriff: Studentenmenge[15].Matrikelnummer’11044’ 

3 Abstraktionsstufen: 

1)Typung durch type Definition einer „Schablone“ 

2)Variablendeklaration durch varDefinition von Speicherplatz gemäß 

der Typdefinition 

3)Variablenwertzuweisung durch bspw.: variablenname100 

3.5. Persistenz von Daten 

-Verfügbarkeit von Daten über Programmlaufzeit hinaus 

-Erleichterung 

Dateien bzw. Datenbanken 

Datei: Sequenz von Datensätzen eines bestimmten Typs 

unlimitiert(beliebig viele Datensätze) 

keine Indexierung der Datensätze 

1)Deklaration einer (typisierten) Datei: 

Var : File of 

2)Arbeiten mit Dateien: 

-Initialisierung 

Assign(, ‚’)Verknüpfung zwischen dem 

programminternen Namen und dem externen Dateinamen 

-Öffnen der Datei 

Reset( variablenname) 

Oder 

Rewrite(variablenname)was sich vorher auf dem Datenträger an Daten 

befand, wird mit diesem Befehl gelöscht und kann überschrieben werden 

-Schließen der Datei: 

Close(variablenname) 

3)Lesezugriff auf getypte Datei: 

Read (variablenname, Elementvariable) 

Bei lesendem Zugriff wird der Positionszeiger( am Anfang immer auf dem 

1. Datensatz) um eine Position in Richtung EOF (end of file) verschoben. 



Assign(, ‚’) 

Reset(Variablenname) Positionszeiger entsteht 

Read(variablenname, Elementvariable) 1. Datensatz ausgelesen 

Read(variablenname, Elementvariable)Positionszeiger um eine Position 

verschoben, 2. Datensatz wird ausgelesen ... 

4)Schreibbefehl: 

Write(variablenname, elementvariable) 

5)Einlesen von Daten in eine Datei: 

Bsp.: 

Type tdaten= record 

Matnr:integer 

Punktzahl: real 

Note:real 

Begin 

Assign(datei,’C:\noten.dat’) 

Rewrite(Datei) 

Readln(Daten.matnr) 

While Daten.Matnr0 do begin 

Readln(Daten.Punktzahl) 

Readln(Daten.Matnr) 

Od 

Write(Datei,Daten) 

End. 

3.6. Mengenverwaltung (Pointer/Zeiger) 

Mächtigkeit der Menge soll nicht a priori beschränkt sein Lösung: Listen 

Bei Arrays: statische Mengenbegrenzung 

Zeiger(pointer): 

Variable mit Information über die Adresse eines Elements von einem 

bestimmten Typ 

1) Deklaration: 

Var: ^Datentyp 

Bsp.: Klausurteilnehmer: ^student 

Type student = record 

Matrikelnr: integer; 

Punktzahl :integer; 

Note: integer; 

Next: ^student 



2) Zuweisungen: 

End; 

Klausurteilnehmer:= Nil (not in list) 

Klausurteilnehmer^.Matrikelnr:=12345 

Klausurteilnehmer^.Punktzahl:=55 

3) Anforderung: Generieren zur Laufzeit 

New(variablenname) 

New(Klausurteilnehmer) 

4) Spezielles Element für den Zugriff auf die Liste: 

z.B. Wurzel: ^student 

5) Einfügen eines neuen Elements(ohne Sonderbedingungen) stets am 

Anfangs einer Liste: 

Bei leerer Liste: 

Wurzel:=Nil 

New(Neu) 

Neu^.next: = Wurzel 

Wurzel:= Neu 

6) Bei vorhandener Liste am Anfang einfügen 

New(Element) 

Eingabe(Element^.Inhalt) 

If Wurzel:= Nil then 

Element^next:=nil 

Wurzel :=Element 

Else 

Element^.next:=wurzel 


Fi 

7) Am Ende einer Liste einfügen: 

New(Element) 

Eingabe(Element^.Inhalt) 

New (Laufzeiger) 

Laufzeiger^.next:= Nil 

If Wurzel:= Nil then 

Element^next:=nil 




Else 

Laufzeiger^.next:=Element 

Element^.next:=nil 

Fi 

Laufzeiger:=Element 

8) Bei sortierten Listen: 

-Suchen der Stelle, an der eingefügt werden soll 

-Einfügen 

9) allgemein: Suchen und Finden 

Bsp.: Lauf:^student 

Lauf:= wurzel 

If Lauf^.matrikelnr = gesuchte Matrikelnummer 

Then „gefunden“ 

Else 

Lauf:=Lauf^ .next (weiterlaufen und erneut vergleichen) 

10) Löschen von Elementen aus einer Liste 

Bsp.: 

Begin 

Writeln( ‚BestellNr: ’?) 

Readln(Nr) 

If Wurzel Nil then begin 

If wurzel^.Nr = Nr then 

Wurzel := wurzel^ .next 

Else begin 

New (aktuell) 

aktuell:= wurzel 

while( aktuell^.next Nil )do begin 

if aktuell^.next^nr =nr then 

aktuell^next := aktuell^.next^next 

end; 

aktuell:=aktuell^next 

end; 

end; 

end. 

11) In eine Liste einfügen, die sortiert ist, z.B. nach Artikelnummern 

New(Neu) 

Eingabe(Neu^.Artnr) 

Eingabe(Neu^Bezeichnung) 

Laufzeiger:=wurzel 



Vorlaufzeiger:=wurzel 

Eingefuegt:=boolean 

While (LaufzeigerNil) and (Eingefuegt =false) do 

If Neu^Art < Laufzeiger^.Artnr 

Then Neu^.next := Laufzeiger 

If Laufzeiger =Vorlaufzeiger 

Then Wurzel := Neu 

Else Vorlaufzeiger^.next := Neu 

Eingefuegt := true 

Fi 

Else Vorlaufzeiger := Laufzeiger 

Laufzeiger := Laufzeiger^.next 

Fi 

OD 

If Eingefuegt = false then 

Neu^.next := Nil 

Vorlaufzeiger^.next := neu 

Fi 

12) Vorhandenen Listen sortieren 

Man nehme eine alte, unsortierte Liste und überträgt ihre Daten sortiert in 

eine neue leere Liste 

Ein Bsp.: 

Type zeiger =^Kunde 

Kunde = record 

Knr: integer 

Next:zeiger 

Var wurzel, wurzel2, Aktuell, Laufzeiger, Vorlaufzeiger: zeiger 

Eingefuegt: boolean 

Wurzel2:= Nil 

Laufzeiger :=wurzel 

Aktuell:=wurzel2 

Vorlaufzeiger:=wurzel2 

While Laufzeiger Nil do begin 

If (Wurzel 2 = Nil) or (Wurzel2 ^.Knr>Laufzeiger^.Knr) 

then begin 

New (Neu) 

Neu^.Knr =Laufzeiger^.Knr 

Neu^.next:=wurzel2(bzw. Nil) 

Wurzel2 :=Neu 

End; 

Eingefuegt=true (bis hierhin wurde am Anfang der Liste eingefügt) 



( ab hier: die Position für das neue Element muss gesucht werden) 

Else Aktuell := Aktuell^next 

While aktuellnil and not eingefuegt do begin 

If aktuell^.Knr< Laufzeiger^Knr then begin ( Position noch nicht 

gefunden) 

Vorlaufzeiger:=Aktuell(bzw.Vorlaufzeiger^.next) 

Aktuell:=Aktuell^next 

End 

Else begin( die Position wurde gefunden, nun kann eingefügt werden) 

New(Neu) 

Neu^.Knr:=Laufzeiger^.Knr 

Neu^.next:=aktuell 

Vorlaufzeiger^.next:= neu 

Eingefuegt = true 

End; 

OD 

If not eingefuegt then begin( am Ende der Liste einfügen) 

Vorlaufzeiger^.next := neu; 

Neu^.next:=nil 

End; 

Laufzeiger:=Laufzeiger^.next 

OD 

13) Angebote sollen sortiert nach Angebotsnummern in den 

Arbeitsspeicher eingelesen werden, treffen aber unsortiert ein(man gehe 

von einer doppelt verketteten Liste aus) 

Begin 

Einlesen(Angebotsnr) 

New(Neu) 

New(Wurzel) 

Neu^.Angebotsnr:=Angebotsnr 

If Wurzel=Nil then begin 

Wurzel:=neu 


End else begin 

Lz:=wurzel^.next 

Vz:=wurzel 

While(LzNil) do begin 

If Lz^.Angebotsnr >Neu^.Angebotsnr then begin 

Neu^.prev:=Vz 

Neu^.next:=Lz 

Vz^.next:=neu 

Lz^.prev:=neu 


Vz:=Lz 



Lz:=Lz^.next 

End 

End 

If Lz=Nil then begin 

Vz^.next :=Neu 


end 

end. 

14) Eine Liste aus dem Arbeitsspeicher auf einen Datenträger übertragen 

und damit dauerhaft speichern: 

Ein Bsp.: 

Type 

TArtikel = record 

Artnr: integer 

Artbez: string 

Next: ^tartikel 

End 

Tartikel2= record 

Artnr: integer 

Artbez: string 

End 

Var wurzel, Laufzeiger: ^tartikel 

Var Speichern: tartikel2 

Datei: File of tartikel2 

Assign( Datei, ’C:\Daten.dat’) 

Rewrite(Datei) 

Laufzeiger:= wurzel 

While Laufzeiger Nil Do 

Speichern.Artnr:=Laufzeiger^.Artnr 

Speichern.Bez.:=Laufzeiger^.Bez 

Write(Datei, Speichern) 

Laufzeiger:= Laufzeiger^.next 

OD 

Close(Datei) 

15) Übertragen von Daten von einem Datenträger in den Arbeitsspeicher 

mit anschließender Ausgabe der Liste auf dem Bildschirm: 

Bsp.: 

Type zeiger: ^Tag 

Tag= record 



Menge:integer 

Preis:real 

Next:zeiger 

End 

Absatz =record 

Menge:integer 

Preis:real 

End 

Var Datei: File of Absatz 

Daten: Absatz 

Wurzel, neu, aktuell: zeiger 

Begin 

Assign(Datei,’A:\Abdatz.dat’) 

Reset(Datei) 

New(Wurzel) 

Wurzel:=Nil 

While not EOF(Datei) do begin 

Read(Datei,Daten) 

New(Neu) 

Neu^.Menge:=Daten.Menge 

Nu^.Preis:=Daten.Preis 

Neu^.Next:=wurzel 

Wurzel:=neu 

End 

Close(Datei) 

New(Aktuell) 

Aktuell:=wurzel 

While Aktuellnil do 

Begin 

Writeln(‘Menge:’, Aktuell^.Menge) 

Writeln(‚Preis:’, Aktuell^.Preis :0:2) 

Aktuell:=Aktuell^.Next 

End 

Readln 

End. 

16) Bearbeiten eines Objekts aus einer Objektmenge 

-Finden des Objekts 

-Durchführung der Bearbeitungsoperation 

Bsp.: Type Produkt= record 

Produktnr:integer 



Var wurzel, Laufzeiger 

Pnr: integer 

Lagerbestand:integer 

Next:^produkt 

Eingabe(Pnr) 

Eingabe(Änderungsmenge(Lagerab-oder zugang)) 

Finden des Objekts mit 

Produktnr=Pnr 

Durchführung der Änderung 

While (LaufzeigerNil) and (Laufzeiger^.ProduktnrPnr) 

Do Laufzeiger:=Laufzeiger^.next 

OD 

If Laufzeiger=nil 

Then Ausgabe(‚Pnr existiert nicht’) 

Else 

Laufzeiger^.LagerbestandLaufzeiger^.Lagerbestand+Änderungsmenge 

Fi 

17) Einfügen in eine doppelt verkettete Liste 

Begin 

New(Wurzel) 

New(Neu) 

Eingabe(Nr) 

Neu^.Nr:=Nr 

If Wurzel^.Nr > Neu^.Nr then 

Neu^.prev: =nil 

Neu^.next: = wurzel 

Wurzel:= neu 


Lz:= wurzel^.next 

Vz:=wurzel 

While( Lznil) and (eingefuegt=false) do begin 

If Neu^.Nr


Vz^.next:=neu 

Neu^.prev:=Vz 

End 

End. 

18) Löschen von Elementen aus einer doppelt verketteten Liste: 

Begin 

Einlesen(Nr) 

If Wurzel^.Nr= Nr then begin 

Wurzel:=Wurzel^ .next 

Wurzel^.next^ .prev:=nil 

End 

Else begin 

Lz:=Wurzel 

While(LzNil) do begin 

If Lz^.Nr=Nr then begin 

Lz^.next^.prev:=Lz^.prev 

Lz^.prev^.next:=Lz^.next 

End 

Lz:=Lz^.next; 

End 

End 

End. 

19) Löschen, “Alles in einem” : 

If Löschen^.PrevNil then 

Löschen^.prev^.next:=Löschen^.next 

Fi 

If Löschen^.nextNil then 

Löschen^.next^.prev:=Löschen^.prev 

Fi 

If Wurzel= Löschen 

Then Wurzel:=Löschen^.next 

Fi 

Dispose(Löschen) 

Dieses Skript wurde erstellt von 

Katharina Ruppel 

- S K R I P T E N D E - 

Dies ist kein offizielles Skript und erhebt somit keinen 

Anspruch auf Vollständigkeit und Richtigkeit. 

http://www.wiso.ferit.info 

Mit freundlichen Grüßen 

Ferit Demir

EDV Vorlesungs-sowie Übungs-und Tutoriumszusammenfassung ...

Erfolgreiche ePaper selbst erstellen

Template löschen?

Als Template speichern?