Einzelnen Beitrag anzeigen

Muffel

Registriert seit: 11. Aug 2007
11 Beiträge
 
#1

Problem : rechnen mit arrays

  Alt 27. Aug 2008, 23:25
Hallo,
ich habe ein kleines großes problem.

ich habe in meiner memo versch zahlen wie

20
30
40
50
...

nun will ich aus diesen zahlen den mittelwert bilden.
jedoch weis ich nicht wie ich das machen kann..
bis jetzt kann ich das nur manuel machen

Delphi-Quellcode:
while i < t do begin
   v := a * i ;
  v := v * 3.6;
   i := i+1;

  Memo1.Lines.Add(FloatToStr(v));
  end;



  zahl1 := StrToFloat(Memo1.Lines[1]);
  zahl2 := StrToFloat(Memo1.Lines[2]);
  zahl3 := StrToFloat(Memo1.Lines[3]);
  gesamt := zahl1 + zahl2 + zahl3;
  ende := gesamt / t;

  Edit1.Text := FloatToStr(ende);
abhängig von i werden mehrere einträge gemacht.
mit dieser manuellen art kann ich nur von den 1. drei reihen die zahlen addieren und die durch i teilen ..

kann mir einer helfen wie ich die Memo Line inhalte zusammenrechne ?

MfG

Muffel
  Mit Zitat antworten Zitat