Listbox

[xaromz]

Hallo,

Zitat:

Zitat von Balu der Bär

Obwohl, mir fällt grad ein das wäre ja der Durchschnitt und nicht der Mittelwert. :shock:

Nicht mal das. Du rechnest hier ja mit mod (Anzahl - 1). Richtig ist "value := Round(value / Listbox1.Items.Count);". Für den Durchschnitt, versteht sich.

Gruß
xaromz

[anfänger123]

und wie errechne ich jetzt denn mittelwert

[marabu]

Hi.

Durchschnitt und (arithmetischer) Mittelwert sind landläufig dasselbe. Wenn du aber den mittleren Wert (Median) brauchst, dann musst du deine Werte erst sortieren. Maximum und Minimum sind dann Abfallprodukte des Sorts und der Median ergibt sich zu:

Delphi-Quellcode:

function Median(s: TStrings): Extended;
var
  iMedian: Integer;
begin
  iMedian := s.Count div 2;
  if Odd(s.Count)
    then Result := StrToInt(s[iMedian])
    else Result := (StrToInt(s[iMedian]) + StrToInt(s[Pred(iMedian)])) / 2;
end;

Grüße vom marabu

[sigma]

hallo hat jemand vielleicht noch eine andere idee wie ich den Mittelwert raus bekomme weil #ich hab keine und die eine Lösung versteh ich nicht

[xaromz]

Hallo,

Zitat:

Zitat von sigma

hallo hat jemand vielleicht noch eine andere idee wie ich den Mittelwert raus bekomme weil #ich hab keine und die eine Lösung versteh ich nicht

es geht hier gerade mal um 4 Zeilen Code. Das wirst Du doch rausbekommen, was da passiert.
Zwei Tipps:
Die einzelnen Befehle in der Hilfe nachschlagen.
Am Anfang der Funktion einen Breakpoint setzen und schrittweise durchgehen. Dabei beobachten, wie sich die Variablen verändern.

Wenn das nichts nützt, nochmal konkret nachfragen. Ansonsten würde ich Dir empfehlen, ein paar Tutorials durchzulesen; diese Funktion ist äußerst trivial, und wenn Du hier schon Schwierigkeiten hast, ist wohl das Aneignen von Grundlagen der erste Schritt :wink: .

Gruß
xaromz