Mit Arrays rechnen

[Mysterio08]

Guten Tag,
folgende Situation:
Ich möchte, dass man in ein StringGrid Umsätze von einem ganzen Jahr eingeben kann (Januar, Februar...bis Dezember). Dafür habe ich folgende Zeilen geschrieben:

Delphi-Quellcode:

procedure TForm1.Button_BerechnenClick(Sender: TObject);
var
  Umsatz: Array [1..12] of Single;
begin
  for i := 1 to 12 do
    Umsatz[i] := StrToFloat (StringGrid1.Cells[1,i]);
end

Nun möchte ich, dass der Jahresumsatz errechnet wird. Klar, ich könnte mir das ganze viel einfacher machen und direkt mit den StringGrid-Zellen rechnen, das möchte ich aber nicht.
Wenn ich dann alle Umsätze zugewiesen habe-wie rechne ich dann?
Gesamtumsatz := Umsatz[1] + Umsatz[2]..... + Umsatz[12] Ich glaube da, würde ich mich dumm und dämlich schreiben, und es soll ja Fälle geben, in denen vielleicht tausende Arrays zusammengerechnet werden, ich habe schon bei Delphi-Treff.de geschaut, aber da habe ich nichts Brauchbares gefunden.
Danke schonmal im Vorraus.
mfg. Mysterio08