sortieralogrithmus komplex

[Satty67]

Dann kopiere Inhalt der ersten Listbox mit assign in die zweite Listbox. Danach mit der zweiten weiter, wie eben beschrieben. (PS: Falls zweite doch sortiert sein soll, die Listbox kann selber sortieren)

@Bummi:

glaube er will nur sortieren, um den kleinsten Eintrag zu finden (wofür eine Sortierung aber eigentlich nicht nötig ist)

// temporäre Signatur:

Code:

string smallest = "";
foreach (string item in   listBox1.Items)
{
   if ((smallest == "") || (item.CompareTo(smallest) < 0))
      smallest = item;
}
listBox1.Items.Add(smallest);

[p80286]

Da liegt wohl die übliche Vermengung von Berechnung und Darstellung vor.
Wenn es ein array mit Zufallszahlen gibt, sagenwir mal
zufall: Array [0..8] of integer; dann kann man mit einer einfachen Schleife

Delphi-Quellcode:

minidx:=0;
for i:=1 to 8 do
  if Zufall[i]<Zufall[minidx] then minidx:=i;

den Index des kleinsten Elementes bestimmen.

Bei der Ausgabe werden dann zunächst alle Elemente ohne das kleinste nacheinander ausgegeben, und zum Schluß dann das kleinste angehängt.

Delphi-Quellcode:

for i:=0 to 8 do
  if i<>minidx then Liste.add(inttostr(Zufall[i]));
  Liste.add(inttostr(Zufall[minidx]));

Ich denke, da kommt man mit einem Array locker aus.

Gruß
K-H