Delphi Fehler beim Felderzeugen

Thema durchsuchen

Ansicht

Themen-Optionen

Fehler beim Felderzeugen

Offene Frage von "brutus"

Ein Thema von brutus · begonnen am 21. Sep 2003 · letzter Beitrag vom 29. Sep 2003

Vorheriger Beitrag

Nächster Beitrag

Christian Seehase

(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.123 Beiträge

Delphi 11 Alexandria

Re: Fehler beim Felderzeugen

27. Sep 2003, 17:40

Moin Brutus,

den Fehler beim Minsort hab' ich inzwischen auch gefunden:

Die Schleifen müssen rückwärts laufen, da man bei diesem Verfahren ja je Durchlauf immer den grössten Wert ans Ende packt.
Ersatzweise könntest Du das Verfahren wahrscheinlich auch umdrehen, also immer den kleinsten Wert je Durchlauf an den Anfang legen.

Mit diesen Schleifen läuft es:

markieren

Delphi-Quellcode:

			FOR a:= 8 downto 0 DO

// und

FOR i:= 9 downto a+1 DO

Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist