Sortieralgorithmen Anforderungen und Inhalte Anforderungen 1 Knnen die

Sortieralgorithmen Anforderungen und Inhalte

Anforderungen (1) Können die Bedeutung von Sortieralgorithmen anhand praktischer Anwendungen darstellen Wissen, dass Sortieralgorithmen beliebige Daten sortieren können Können den Bubble-Sort-Algorithmus verbal und als Struktogramm formulieren sowie in Delphi als Programm umsetzen Können aus visuellen Darstellungen den Bubble. Sort und Quick-Sort-Algorithmus identifizieren

Anforderungen (2) Können Möglichkeiten zur Zeitmessung in Delphi einsetzen, um die Ausführgeschwindigkeit von Programmteilen zu messen Können die Qualität von Sortieralgorithmen anhand der Kriterien Speicherbedarf und Ausführungszeit analysieren Können das Zeitverhalten von Algorithmen abschätzen, berechnen und Vergleiche zwischen Algorithmen anstellen Können den Quicksortalgorithmus interpretieren und Festigen die Kenntnisse in der Anwendung von Schleifen und Selektion

Jetzt reicht es aber!

Inhalte Bubble-Sort Quick-Sort Zeitmessung in Delphi Modulare Programmierung Arbeit mit Arrays (Wiederholung) Zufallszahlen (Wiederholung) Struktogramme (Wiederholung)

Bubblesort?

Welches Bild zeigt Bubblesort?

Bubblesort – Struktogramm (nicht optimiert) Warum von n bis 1 und nicht umgekehrt? Vertauschen, wie geht das?

Bubble-Sort (optimiert) Worin steckt die Optimierung? Wirklich besser=schneller?

Aufgabe Den Algorithmus in Struct. Ed selbst am Computer eingeben.

Zeitmessung in Delphi Wie werden Datums-/Zeitinformationen intern im Computer gespeichert? Im realen Leben: 8. 3. 07 12: 15 8. März 2007 1215 03/08/2007 13. 15 Uhr Warum ungünstig für Computer? Ein Experiment in Excel A 1: =Jetzt() A 2: = Jetzt() Zellenformat auf Zahlen umstellen 08. 03. 2007 08: 33 39149, 35667800930000

Zeitmessung in Delphi Variante 1 Var Anfang, Ende: real; Differenz: String; Begin Anfang: = Time; { der zu messende Teil} Ende : = Time; // Differenz in Sekunden mit 2 Nachkommastellen Differenz: =Float. To. Str. F((Ende-Anfang)*24*3600, ff. Fixed, 10, 2) End Genauigkeit? Siehe LB Buch Seite 158

Zeitmessung Variante 2 procedure Form 1. Button 1 Click(Sender: TObject); var Zeit: Cardinal; begin Zeit : = Get. Tick. Count; //Befehlesfolge deren Zeitdauer bestimmt werden soll Caption : = Int. To. Str(Get. Tick. Count - Zeit); end; Get. Tick. Count liefert die Anzahl der Millisekunden seit Windowsstart. Funktioniert das in Delphi 3? ? ? Keine Ahnung! Ausprobieren (Suchen in der Hilfe)