Консольную программу написать в графическом интерфейсе

 #include <iostream>
#include <conio.h>
#include <time.h>
#include <math.h>
 
using namespace std;
int main();
{
   int const MAX=100;
   int A[MAX][MAX];
   int n,i,j,f,g;
   int s=0;
   cout <<"Vvedite n > 1 = ";
   cin >>n;
   for (i=0;i<=n;i++)
      for (j=0;j<=n;j++)
      {
          A[i][j]=rand()%10000;
          cout <<"A[ "<<i<<" ][ "<<j<<" ]= "<<A[i][j]<<"\n";
      }
      int max=A[0][0];
   for (i=1;i<=n;i++)
       for(j=1;j<=n;j++)
       {
          if (A[i][j]>max)
          {
             max=A[i][j];
             f=i;
             g=j;
             s=f*g;
          }
       }
       cout <<"Maxsimum: "<<max<<endl;
       cout <<"Proizvedenie: stroka: "<<f<<" stolbec: "<<g<<" = "<<s<<endl;
       system("Pause");
       return 0;
   }

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
//---------------------------------------------------------------------------
 
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
 
{
int  N;
int max;
int i,j,f,g,s;
 N=StrToFloat(Edit1->Text);
Form1->StringGrid1->ColCount=N+1;
Form1->StringGrid1->RowCount=N+1;
Form1->StringGrid1->Cells[0][0]="numm";
int** matr=new int *[N];
for (i=0; i<N; i++)
for (j=0; j<N; j++)
{
  matr[i]=new int [N];
  Form1->StringGrid1->Cells[i+1][0]=i+1;
  Form1->StringGrid1->Cells[0][j+1]=j+1;
  Form1->StringGrid1->Cells[i+1][j+1]=random(100)-3;
  }
  for (i=0; i<N; i++)
  for (j=0; j<N; j++)
  {
  matr[i][j]=StrToInt(StringGrid1->Cells[i+1][j+1]);
  }
   max=matr[1][1];
   for (i=2;i<=N;i++)
       for(j=2;j<=N;j++)
       {
          if (matr[i][j]>max)
          {
             max=matr[i][j];
             f=i;
             g=j;
             s=f*g;
          }
       }
  // Edit2->Text=g;
   Edit2->Text=s;
 
}
 
//---------------------------------------------------------------------------