защита 6

Белорусский государственный университет информатики и радиоэлектроники Факультет компьютерного проектирования
Лабораторная работа №6
Обработка двухмерных динамических массивов
Вариант 5
Выполнил: Долгий Олег
Проверил: Сенько А.В.
{
if ((Edit1->Text!="")&&(Edit2->Text!=""))
{
int n=StrToInt(Edit1->Text);
int m=StrToInt(Edit2->Text);
int **a;
a=new int*[n];
for(int i=0; i<n; i++)
{
a[i] = new int [m];
}
bool c=true;
for (int i=0;(i<n)&&(c);i++)
{
for (int j=0;(j<m)&&(c);j++)
{
if(StringGrid1->Cells[j+1][i+1]=="")
{
c=false;
ShowMessage("Введите все элементы");
}
else
{
a[i][j]=StrToInt(StringGrid1->Cells[j+1][i+1]);
}
}
}
if (c)
{
int s=0;
for (int i=0;i<n;i++)
{
for (int j=1;j<m-1;j++)
{
if ((a[i][j-1]>a[i][j])&&(a[i][j+1]<a[i][j]))
{
s++;
}
}
}
Label3->Caption="Результат:"+IntToStr(s);
}
for(int i=0; i<n; i++)
{
delete []a[i];
}
}
}