произведение элементов строк

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int n,m;
int mas[10][10];
int p[10];
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int i,j,h;
n=StrToInt(Edit1->Text);
m=StrToInt(Edit2->Text);
StringGrid1->ColCount=n;
StringGrid1->RowCount=m;
h=1;
 
for (i=0;i<n;i++)
for (j=0;j<m;j++)
mas[i][j]=StrToInt(StringGrid1->Cells[i][j]);
 
for (i=0;i<n;i++)
{for (j=0;j<m;j++);
p[j]=StrToInt(StringGrid1->Cells[i][j])*h;
}
StringGrid2->Cells[1][j]=p[j]
p[j]=IntToStr(StringGrid2->Cells[0][j]); //идет вывод,но не знаю как правильно...
}
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int n,m;
int mas[10][10];
int p[10];
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
n=StrToInt(Edit1->Text);
m=StrToInt(Edit2->Text);
StringGrid1->ColCount=n;
StringGrid1->RowCount=m;
StringGrid2->ColCount=m;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int i,j, result;
 
for (j=0;j<m;j++)
    {
    result= 1;
    for (i=0;i<n;i++)
        {
        result= result*StrToInt(StringGrid1->Cells[i][j]);
        }
    StringGrid2->Cells[j][0]= IntToStr(result);
    }
 
}
//---------------------------------------------------------------------------