Notendurchschnitt berechnen und Initialisierung eines Array of integer

[Benmik]

Wozu brauchst du überhaupt ein Array? Auf dem Tablet getippt, daher rudimentär + ungetestet:

Delphi-Quellcode:

For i := 1 to 6 do
  Inc(sum,StrToInt(FindComponent('edt' + i.ToString).Text);
Durchschnitt := sum / 6;

Und falls es doch mit einem Array sein soll:

Delphi-Quellcode:

For i := Low(Notenarray) to High(Notenarray) do
  Notenarray[i] := StrToInt(FindComponent('edt' + i.ToString).Text);
For i := 1 to 6 do
  Inc(sum,Notenarray[i]);

Besser ist 1 to 6 , weil FindComponent darauf angewiesen ist.