Max und Mean Value Bestimmung

[leddl]

Also zuerst mal würde ich empfehlen, daß du deinen Beitrag editierst und dem Topic einen aussagekräftigen Namen gibst. Dumme Fragen gibts hier genug, das zu wissen hilft bei der Suche aber nicht weiter
Dann zu deiner Frage: Wenn ich dich richtig verstanden habe, möchtest du die maximale Abweichung deines Arrays zu seinem Mittelwert berechnen. Stimmt das? Ist der Mittelwert schon vorgegeben, oder muß er erst noch berechnet werden?
Da das Berechnen ja kein Problem sein sollte, geh ich mal davon aus, daß du ihn schon hast.

Delphi-Quellcode:

MaxDiff := 0;
for i := low(aData) to high(aData) do
begin
  if (max(MeanValue,aData[i]) - min(MeanValue,aData[i])) > Maxdiff then
    MaxDiff := max(MeanValue,aData[i]) - min(MeanValue,aData[i])
end;

Dafür müßtest du die Unit Math einbinden. Evtl macht "abs()" das gleiche wie "max(MeanValue,aData[i]) - min(MeanValue,aData[i])", die Funktion kannte ich aber nicht und hab auch gerade kein Delphi zur Hand, um nachzuschauen. In dem Fall, kannst dus ja grade ersetzen.