Telefonbuch

[alleinherrscher]

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...