Одномерный динамический массив.

[Кристинка-]

Объясните пожалуйста, как это сделать?
Есть двумерный массив, количество столбцов и строк - n, число вводится пользователем в Edit. Необходимо, чтобы подсчитывалась сумма в каждой строке и выводилась на экран, и чтобы подсчитывалась сумма в каждом столбце и тоже выводилась на экран.
Если можете код программы......
( Просто мне нужно использовать стринггрид, и сумма каждой строки и каждого столбца должна выводиться в FixedCol и в FixedRow. Но с таблицей я справлюсь, а с массивом не дружу...)

[Stilet]

Вот пример заполнения Грида:

var i,j,m:integer;
begin
 with StringGrid1 do begin
   tag:=StrToIntDef(Edit1.Text,0);
   RowCount:=tag; ColCount:=tag;
   for i:=0 to RowCount-2 do begin
    for j:=0 to ColCount-2 do begin
     m:=random(100);
     Cells[i,j]:=IntToStr(m);
    end;
   end;
 end;
end;

Здесь два проходных цикла - посмотри, и примени его к рассчету сумм