erstmal vielen dank für die schnelle antwort
habe aber immernoch ein problem,
als mittelwert der werte
0
18
36
54
72
wird mir 1,03518951684639E269 ausgegeben .... =/
Delphi-Quellcode:
while i < t do begin
v := a * i ;
v := v * 3.6;
i := i+1;
Memo1.Lines.Add(FloatToStr(v));
end;
for i := 0 to Memo1.Lines.Count do
begin
Summe := Summe + StrToIntDef( Memo1.Lines[i], 0);
end;
Mittelwert := Summe / Memo1.Lines.Count;
Edit1.Text := FloatToStr(Mittelwert);
end;