вычислить сумму в двумерном массиве

[vesada]

procedure TForm1.Button1Click(Sender: TObject);
begin
randomize;
for i := 0 to 10 do begin
for j:=0 to 10 do begin
StringGrid1.Cells[i,j]:= InttoStr( random(100)-50);
это часть программы для заполнения массива случайными числами...
нужно подсчитать сумму элементов каждой строки и столбца, и вывести в stringgrid2.cells[i,j]- соответственно.

[RUSt88]

хм.. в принципе несложно, но если выложить кусок кода, к-рый считает суммы, вы сможете разобраться?

могу выполлнить полностью ваше задание за небольшое вознаграждение