Summe, Mittelwert, min und max ermitteln...

[DeddyH]

Das sind Fließkommazahlen? Dann etwas anders:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var summe, mitte, max, zahl, min:double;
    i: integer;
begin
  summe:=0;
  for i := 0 to Memo1.Lines.Count - 1 do
    begin
      zahl:=strtofloat(memo1.lines[i]);
      summe := summe + zahl;
    end;
  edit1.Text:=floattostr(summe);
end;

[edit] Abschließendes end vergessen [/edit]