Dreistein

 


* Startseite     * Über...     * Archiv     * Gästebuch     * Kontakt



* Themen
     Willkommen
     Allgemeines
     * Variablen
     * Function
     * Procedure
     * String
     * Array
     FormObjekte
     * Button
     * CheckBox
     * Editfeld
     * Label
     * Listbox
     * RadioButton
     * Timer
     * Turtle
     Sortieralgorithmen
     * Arraysort
     * Bubblesort
     * Selection Sort
     * Quicksort
     Schleifen
     * repeat-Schleife
     * while-Schleife
     * for-Schleife
     Rekursion
     * Ackermann
     * Binominalkoeffizent
     * Fibonacci Zahlen
     * Fakultät
     * GGT
     * Kochfunktion
     * Sierpinskifunktion
     Nützliches
     * Hintergrundbild
     * Massenanzeige
     * Massenbenutzung
     * Schreibtischtest






* Bubblesort

Quelltext

procedure TForm1.Button9Click(Sender: TObject);
var i, j: Integer;
begin
for j := 0 to (listbox2.Items.Count - 1) do
for i:=0 to (listbox2.Items.Count - j - 2) do
if listbox2.items[i] > listbox2.items[i+1] then
listbox2.items.exchange(i, i+1);
end;
16.11.05 16:09


Bewertung

Stabil: Ja
Geschwindigkeit: Langsam
Bei vorsortieren Zahlen: Gut
Sortiermenge: Zahlen, Buchstaben und Gemische

Ergebnis (4 von 10)
16.11.05 16:08


Erklärung

BubbleSort ist ein recht einfacher Algorithmus. Er f?ngt unten an und vergleicht die ersten beiden Zahlen. Ist die eine Zahl dar?ber kleiner, so tauscht er sie. Dies macht er so lange, bis die n?chste Zahl mal eine gr??ere ist. Dann nimmt er die neue Zahl und verf?hrt mit ihr genauso. Wenn er dann die gr??te Zahl am Ende stehen hat, f?ngt er wieder von vorne an, allerdings ohne das jeweils letzte Element.
16.11.05 16:06





Verantwortlich für die Inhalte ist der Autor. Dein kostenloses Blog bei myblog.de! Datenschutzerklärung
Werbung