Задана матрица размером N*M. Определить количество «особых» элементов матрицы, считая элемент «особым», если он больше с

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int  **A;
int N,M,sum = 0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
N=StrToInt(Edit1->Text);
M=StrToInt(Edit2->Text);
 StringGrid1->RowCount=N+1;
 StringGrid1->ColCount=M+1;
   for (int i=1;i<=N;i++) StringGrid1->Cells[0][i]="i="+IntToStr(i);
   for (int i=1;i<=M;i++) StringGrid1->Cells[i][0]="j="+IntToStr(i);
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 
int i,j,k=0;
A=new int*[N];
for (i=0; i<N; i++)
A[i] = new int[M];
 for (i=0;i<N;i++)
   for (j=0;j<M;j++)
A[i][j]=rand ()%20;
  for (i=0;i<N;i++)
    for (j = 0; j < M; j++)
StringGrid1->Cells[j+1][i+1]= IntToStr(A[i][j]);
for (j = 0; j < M; j++)
{ sum=sum+A[j][i];
for(int a=0;a<N;a++)
{
if(A[a][j]>sum-A[a][j]) k++;
}
}
Edit3->Text=IntToStr(k);
delete [] A;
 
}