В матрице P(N;M) найти сумму элементов каждого столбца

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
class matrix
{int **p;
int *mas;
 public:
 matrix() {p=NULL;}
 ~matrix() {if(p)delete[]p;}
                if(mas)delete[]mas;}
 
 void formuv(int m,int n);
 int ruh(int m,int n);
 int get_p(int i2,int j2)
 {return p[i2][j2];}
 int get_q(int i2)
 {return mas[i2];}
 };
 
 matrix obj;
 
 void matrix::formuv(int m,int n)
 {int row=m;
  int col=n;
 if(p) delete[]p;
 p=new int *[m];
 int i,j;
 for(i=0;i<m;i++)
 p[i]=new int [n];
 for(i=0;i<m;i++)
 {for(j=0;j<n;j++)
 p[i][j]=random(50)-15;}}
 
 int matrix::ruh(int m,int n)
 {int row=m;
  int col=n;
  int *mas = new int[n];         
    for(int i = 0; i < row; i++)         
    {mas[i]=0;
        for(int j = 0; j < col; j++)
            mas[i]+=p[j][i];
           }}
 
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
 
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{int i,j;
 randomize();
 obj.formuv(StrToInt(Edit1->Text),StrToInt(Edit2->Text));
 StringGrid1->ColCount=StrToInt(Edit1->Text);
 StringGrid1->RowCount=StrToInt(Edit2->Text);
 for(i=0;i<StrToInt(Edit1->Text);i++)
 for(j=0;j<StrToInt(Edit2->Text);j++)
 StringGrid1->Cells[i][j]=IntToStr(obj.get_p(i,j));
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int n,m,i;
obj.ruh(m,n);
ListBox1->Clear();
for(int i=0;i<n;i++)
ListBox1->Items->Add(IntToStr(obj.get_q(i)));
}
//---------------------------------------------------------------------------

mas[i]+=p[j][i];

 p=new int *[m];
 int i,j;
 for(i=0;i<m;i++)
 p[i]=new int [n];

int row=m;
int col=n;
 
int *mas = new int[n];
for(int i = 0; i < row; i++)
{
   mas[i]=0;
   for(int j = 0; j < col; j++)
      mas[i]+=p[j][i]; // Вот тут !!!
}

class TForm1 : public TForm
{
__published: // IDE-managed Components
 
    TLabel *Label1;
    TLabel *Label2;
    TEdit *Edit1;
    TEdit *Edit2;
    TStringGrid *StringGrid1;
    TButton *Button1;
    TButton *Button2;
    TListBox *ListBox1;
 
    void __fastcall Button1Click(TObject *Sender);
    void __fastcall Button2Click(TObject *Sender);
 
private: // User declarations
    int m, n; // <--- Вот эту строку добавляем !!!
 
public: // User declarations
    __fastcall TForm1(TComponent* Owner);
};

class matrix
{
    int **p;
    int *mas;
 
public:
    matrix()
    {
        p = NULL;
    }
 
    ~matrix()
    {
        if (p)
            delete[]p;
    }
 
    void formuv(int m, int n);
    void ruh(int m, int n);
 
    int get_p(int i2, int j2)
    {
        return p[i2][j2];
    }
 
    int get_q(int i2)
    {
        return mas[i2];
    }
};
 
matrix obj;
 
void matrix::formuv(int m, int n)
{
    if (p)
        delete[]p;
    p = new int *[m];
    int i, j;
    for (i = 0; i < m; i++)
        p[i] = new int[n];
    for (i = 0; i < m; i++)
    {
        for (j = 0; j < n; j++)
            p[i][j] = random(50) - 15;
    }
}
 
void matrix::ruh(int m, int n)
{
    mas = new int[n]; // Обрати внимание на изменения !!!
    for (int i = 0; i < n; i++)
    {
        mas[i] = 0;
        for (int j = 0; j < m; j++)
            mas[i] += p[j][i];
    }
}
 
TForm1 *Form1;
 
// ---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{
}
 
// ---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    randomize();
    obj.formuv(StrToInt(Edit1->Text), StrToInt(Edit2->Text));
    m = StrToInt(Edit1->Text);
    n = StrToInt(Edit2->Text);
 
    StringGrid1->RowCount = m;
    StringGrid1->ColCount = n;
    StringGrid1->FixedCols = 0;
    StringGrid1->FixedRows = 0;
    StringGrid1->DefaultColWidth = 25;
    for (int i = 0; i < m; i++)
        for (int j = 0; j < n; j++)
            StringGrid1->Cells[j][i] = IntToStr(obj.get_p(i, j));
 
}
// ---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    obj.ruh(m, n);
    ListBox1->Clear();
    for (int i = 0; i < n; i++)
        ListBox1->Items->Add(IntToStr(obj.get_q(i)));
 
}