Умножения матриц, цикл

int i,j;
for(i=0;i<StringGrid1->RowCount;i++)
for(j=0;j<StringGrid1->ColCount;j++)
StringGrid3->Cells[i][j] = StrToInt(StringGrid1->Cells[i][j]) * StrToInt(StringGrid2->Cells[i][j]);

int i,j,r;
  int a1=CSpinEdit1->Value,
      a2=CSpinEdit2->Value,
      b1=CSpinEdit1->Value,
      b2=CSpinEdit2->Value; // назначение переменных
                              // с размером матриц для манипуляции с массивами
  int c1=a1,c2=b2;
  int **a = new int*[a1];
  for (int i=0; i <a1; ++i) {
    a[i] = new int[a2];
  } //Создание динамического массива с размером Матрицы1
  int **b = new int*[b1];
  for (int i=0; i <b1; ++i) {
    b[i] = new int[b2];
  } //Создание динамического массива с размером Матрицы1
  int **c = new int*[c1];
  for (int i=0; i <c1; ++i) {
    c[i] = new int[c2];
  } //Создание динамического массива с размером Матрицы1
 
  for (i = 0; i < a1; i++) {
    for (j = 0; j < a2; j++) {
      if (StringGrid1->Cells[i][j]=="") { // Перенос данных с СтринГрид1 в Массив Матрицы1
        StringGrid1->Cells[i][j]=0;
      }
      a[i][j]=StringGrid1->Cells[i][j].ToInt();
    }
  }    
  for (i = 0; i < b1; i++) {
    for (j = 0; j < b2; j++) {
      if (StringGrid2->Cells[i][j]=="") { // Перенос данных с СтринГрид2 в Массив Матрицы 2
        StringGrid2->Cells[i][j]=0;
      }
      b[i][j]=StringGrid2->Cells[i][j].ToInt();
    }
  }
  for (i = 0; i < c1; i++) {
    for (j=0;j<c2;j++) {
      r=0;
      for (int k = 0; k < a2; k++) {
       r+=a[i][k]*b[k][j]; // Расчет Элементов матрицы
      }
      StringGrid3->Cells[i][j]=r; // Вывод Матрицы3 - Результата в СтринГрид3
    }
  }

for (int k = 0; k < a2; k++) 
       r+=a[i][k]*b[k][j]; // Расчет Элементов матрицы

for (int k = 0; k < a2; k++) {
       r+=a[k][j]*b[i][k]; // Расчет Элементов матрицы