Danke für die Rückmeldung. Doch möchte ich folgendes anmerken:
1)
Zitat:
Bubblesort greift auf ar[length(ar)] zu also BUMM!
im qt steht doch folgende schleife:
Delphi-Quellcode:
while i<length(ar) do //hier
begin
a:=ar[i];
b:=ar[i+1];
if a<=b
then i:=i+1
else
begin
c:=a;
a:=b;
b:=c;
ar[i]:=a;
ar[i+1]:=b;
i:=i+1;
end;
end;
dadurch, dass in der while schleife nicht "<=" steht, läuft sie bis length(ar)-1. Es macht auch nicht "BUMM!" - sondern es gibt die korrekte Reihenfolge aus.
2)
Zitat:
In Quicksort steht immer noch der Schrott
wb[j]:=wb[i];
wb[i]:=b;
nach der while Schleife.
=>hab ich rausgeworfen. - hat aber keine Auswirkung??
3) im anhang jetze eine zip mit
dpr,
dcu,
pas, exe,
dfm,
dcu,cfg etc