sortieralogrithmus komplex

[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