Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi zweidimensionales array sortieren(BubbleSort) (https://www.delphipraxis.net/126303-zweidimensionales-array-sortieren-bubblesort.html)

AlexanderBrade 22. Dez 2008 13:31


zweidimensionales array sortieren(BubbleSort)
 
Wie schreibe ich die zweite Dimension dazu? Im übrigen wofür steht "data" und wohin muss ich die Prozedur schreiben?
Und wie kann ich dann aus der sortierten "Liste" die 8 besten Leistungen auslesen?(Es geht um ein Notenberechnungsprogramm)

Delphi-Quellcode:
Procedure BubbleSort;
var i,j : Integer;
Begin
  For i:= N downto 1 Do
    For j:= 1 To i Do
      If (Data[j-1] > Data[j]) Then SwapValues( j-1, j );
End;

Mein Feld lautet array[1..4,7..12]

Noedel 22. Dez 2008 13:37

Re: zweidimensionales array sortieren(BubbleSort)
 
diese bubblesort variante wäre mir aber neu ;)

was data sein soll, kann dir wohl keiner sagen...

Wie du die besten / größten 8 Elemente herausfischt, ist doch wohl klar...
ersteinmal _richtig_ sortieren und dann die letzten 8 rausnehmen.

Die procedure kommt in den Quelltext :D

edit: vergessen
Delphi-Quellcode:
 
Tarray = Array of Array of Integer;
So bekommst du n zweidimensionales Array

DeddyH 22. Dez 2008 13:38

Re: zweidimensionales array sortieren(BubbleSort)
 
Data scheint ein eindimensionales Array als globale Variable zu sein.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:26 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz