Матрица - двумерный массив

[Vitalya_1993]

поэтому я засомневался в правильности

[Vitalya_1993]

почему b[i]=0? и почему при случайном заполнении первые 2 элемента всегда 0?слишком много не точностей и вся матрица должна быть двумерным массивом и с д.м нужно проводить все действия!!

[Mad_Cat]

StringGrid = двумерный массив

почему b[i]=0

Понятие инициализации переменных тебе знакомо?

первые 2 элемента всегда 0

Потому что строчку

Randomize;

надо вставить после 1 begin

[Vitalya_1993]

мы совершенно не пониманием друг друга((((

[Mad_Cat]

мы совершенно не пониманием друг друга((((

Я давно все уже понял! Ваши темы для меня в Игноре!
Удачи!!!

[Vitalya_1993]

Ладно!!!...

[viron]

Mad_Cat Все правильно написал. В ячейке b[0] запишем b1, b[1] - b2, b[2] - b3.

procedure TForm1.Button1Click(Sender: TObject);
var
  row, col: Integer;
  b: array[0..2] of Integer;
  b1, b2, b3: Integer;
begin
  Randomize;

  // заполнение массива
  for row:= 0 to 2 do
    for col:= 0 to 2 do
      StringGrid1.Cells[col, row]:= IntToStr( Random(100) );


  for row:= 0 to 2 do
  begin
    b[row]:= 0;
    for col:= 0 to 2 do
      b[row]:= b[row] + StrToInt(StringGrid1.Cells[col,row]);
  end;

  Label1.Caption:= 'b1 = ' + IntToStr(b[0]) + #13 +
    'b2 = ' + IntToStr(b[1]) + #13 +
    'b3 = ' + IntToStr(b[2]);
end;

[Vitalya_1993]

Ладно ребят,забудьте...я совсем запутался...