|
Registriert seit: 17. Nov 2005
Ort: Hamburg
1.083 Beiträge
Delphi XE2 Professional
|
Re: Mergesort vs. bubblesort Demo (Prob. m. Mergesort)
25. Jun 2006, 22:03
@Coder
der z.Z. in Wikipedia abgebildete MergeSort ist fehlerhaft - liefert keine stabile Sortierung.
Delphi-Quellcode:
for z := links to rechts do
begin
if hilfs[x] < hilfs[y] then
wenn du in der Zeile unter dem begin die if-Bedingung so änderst, dann arbeitet er korrekt
if (x<=mid) and (hilfs[x] <= hilfs[j]) then
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
|