Entwickler-Ecke

Algorithmen, Optimierung und Assembler - Buchstabensortieren


Delphin-Liebhaber - Sa 01.07.06 19:35
Titel: Buchstabensortieren
Wir programmieren Selection-Sort mit Delphi(!!) und wollen zufällig 10 der 26 Buchstaben des geläufigen Alphabetes sortieren und dann ausgeben lassen. Leider haben wir null Ahnung und würden uns sehr freuen, wenn uns jemand von euch helfen könnte. Wir bräuchten einen kompletten Quelltext!!

Ihr könnt euch nicht vorstellen, wie dankbar wir euch wären.

Danke
Conny + Franzi :)

Moderiert von user profile iconChristian S.: Titel geändert.


Christian S. - Sa 01.07.06 20:03

Hallo!

Fragen der Art "Mach mir meine Hausaufgabe" sind hier nicht sehr beliebt. Viel besser (auch für Euch, auf lange Sicht) ist es, wenn wir Euch dabei helfen, die Aufgabe selber zu lösen.

Daher: Wie sieht denn Euer bisheriger Ansatz aus und wo hakt es?

Grüße
Christian


Delphin-Liebhaber - Sa 01.07.06 20:54

procedure SelectionSort;
var i, j, iMax, Max : Integer;
begin
for i:=10 downto 2 do
begin
iMax:=i;
Max:= Feld[i];
for j:=1 to i-1 do
if Feld[j]>Max then
begin
iMax:=j;
Max:= Feld[j];
end;

Feld[iMax]:=Feld[i];

Feld[i]:= Max;
end;
end;


jetzt wissen wir nur nicht, wie wir das dann so ändern, dass es mit buchstaben funzt... irgendwie muss es doch mit chr() gehen - aber so genau wissen wir das eben ni