Autor Beitrag
Delphin-Liebhaber
Hält's aus hier
Beiträge: 2



BeitragVerfasst: Sa 01.07.06 19:35 
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.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 20451
Erhaltene Danke: 2264

Win 10
C# (VS 2019)
BeitragVerfasst: 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

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".
Delphin-Liebhaber Threadstarter
Hält's aus hier
Beiträge: 2



BeitragVerfasst: 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