Mittelwert von Myarray

[mkinzler]

Delphi-Quellcode:

for i := Low(Myarray) to High(Myarray) do
  for j := Low( MyArray[i]) to High( MyArray[i]) do
  begin
       Summe := Summe + MyArray[i,j];
       inc( anzahl);
  end;
mitte:= Summe/ anzahl;
edit2.Text:= inttostr(mitte);