Hallo,
Delphi-Quellcode:
i := Low(Myarray) to High(Myarray) do
summe := Summe + Myarray[i];
mitte := summe / 4;
die Summe nicht durch 4 dividieren, sondern durch: High(Myarray)-Low(Myarray). Aber vergiss die Klammer um diesen Ausdruck nicht.
Noch ne Bemerkung:
Jetzt haben wir dir alles gelöst ohne dass du nachdenken musstest.
Ist das nicht schön?
Grüsse
Rainer