Quicksort ohne array??? quicksort auf listen!

[delphi-anfaenger]

hallo,

ich habe ein problem: wir sollen für die schule ein struktogramm zu quicksort auf listen erstellen und die funktionsweise erklären! bisher finde ich aber nur quellcodes und struktogramme zu quicksort auf einem array! kann mir da jemand weiterhelfen?

dankeschön schon einmal für euer bemühen,
gruß r.

[Thanatos81]

Na das ist doch eigentlich prima, das du keine Struktos zu Quicksort auf Listen findest. Schließlich sollt ihr das ja selber erarbeiten um etwas dabei zu lernen.

Du hast also ein Strukto für Quicksort (QS) auf Arrays? Nun, was ist denn der Unterschied zwischen QS auf Arrays und QS auf Listen? Der Algorithmus nicht, denn das ist in beiden Fällen QS. Das Grundlegende bleibt also gleich, du kannst also die Struktur des Struktos ziemlich genau beibehalten. Was ist dann der Unterschied? Der Unterschied ist eigentlich nur, wie man auf die einzelnen Elemente des Datentyps zugreift und vor allem wie man diese an eine bestimmte Stelle einfügt. Genau genommen machen Listen dir es sogar noch einfacher als Arrays. Bei einem QS auf ein Array benötigst du noch Variablen von dem Typ, von dem auch dein Array ist als Zwischenspeicher für die Werte. Bei einer Liste kannst du direkt verschieben, ohne den Wert aus der Liste zwischenspeichern zu müssen.

Hoffe, das hilft dir als Denkanstoß, denn eine fertige Lösung für eine Schulaufgabe wirst du hier nicht bekommen. Falls du mehr Hilfe brauchst, bräuchten wir etwas mehr an Informationen, z.B. wo genau es hakt.

Schönen Gruß,
Thomas

P.S.: Code oder Strukto in Delphi zu QS auf Listen findest du deswegen nicht, da diese in TList bereits vorhanden sind und einfach angewendet werden könne, wenn ich mich recht erinnere. Aber diese Antwort wird euer Lehrer/eure Lehrerin wohl nicht gelten lassen

[jottkaerr]

Hallo,

Zitat von Thanatos81:

P.S.: Code oder Strukto in Delphi zu QS auf Listen findest du deswegen nicht, da diese in TList bereits vorhanden sind und einfach angewendet werden könne, wenn ich mich recht erinnere. Aber diese Antwort wird euer Lehrer/eure Lehrerin wohl nicht gelten lassen

Delphi-Quellcode:

procedure Strafarbeit;
var
  i: Integer;
begin
  for i := 1 to 1000 do
    Writeln('Eine TList ist keine Liste.');
end;

jkr