Wie berechne ich alle Summen, Mittelwerte von 1 bis "Zahl"

[FAlter]

Hi,

doch, man kann auch dort Add nehmen:

Delphi-Quellcode:

Memo1.Lines.Add(S2 + ': ' + S1);
StringGrid1.Cols[1].Add(S1);
StringGrid1.Cols[0].Add(S2);

So hab ichs in meiner Lösung gemacht. Im StringGrid je in eine Zeile, im Memo durch Doppelpunkt getrennt.

Da ich hier niemanden benachteiligen möchte, indem ich dessen Hausaufgaben mache und ihn um die Übung bringe, gibts das aber erstmal ohnne Source.

Mfg
FAlter

[edit]Jetzt mit BeginUpdate und EndUpdate![/edit]