Okay.
Also etwas pseudo-code:
Code:
Zähle j von 0 bis Anzahl_der_Telefonbucheinträge-1 hoch
Tauschindex=j
Zähle i von j bis Anzahl_der_Telefonbucheinträge-1 hoch
Falls Telefonbucheintrag[2*i] weiter vorn im Alphabet steht als Telefonbucheintrag[2*TauschIndex]
dann: Setze TauschIndex=i
Tausche_Telefonbucheintrag(j,TauschIndex)
Erklärung: i und j sind Laufindizes, die durch eine FOR Schleife hochgezählt werden.
TauschIndex enthält den Index des Namens im TElefonbuch, der am weitestens vorne im Alphabet steht.
Versuch mal, das in Delphi Code umzubauen. Wenn du noch Verständnisfragen hast, sag bescheid.
Als Hilfe:
Die If-Abfrage kannst du so programmieren:
Delphi-Quellcode:
if CompareStr(Telefonbuch[2*i],Telefonbuch[2*TauschIndex])<0 then
TauschIndex:=i;
Info zu CompareStr
Viel Erfolg!
//edit: wieder mal ne kleine Code-Korrektur...sry...