table-StringGrid - C++ Builder

private: // User declarations

   bool __fastcall is_First(int value);

   int tab_First[1000];

   int date[9][9];

   void __fastcall init_First();

   void __fastcall init_Date();

bool __fastcall TForm1::is_First(int value)

{

int i,sum;

sum=0;

for(i=1;i<value+1;i++)

if(value%i==0)

  ++sum;

if(sum==2)

return true;

else

     return false;

}

void __fastcall TForm1::init_First()

{

int i,j;

j=2;i=0;

do

{

  if(is_First(j))

  {

  tab_First[i]=j;

  ++i;

  }

  ++j;

}while(i<1000);

}

void __fastcall TForm1::init_Date()

{

int i,j,k,centr,left,right,s;

centr=4;

i=0;

right=i+1;

left=right+1;

do

{

  j=centr+1;

  s=1;

  do

  {

   date[i][j]=tab_First[s*(i+1)];

   ++s;

   ++j;

  }while(j<9);

  k=centr-1;

  s=1;

  do

  {

   date[i][k]=tab_First[s*(i+1)];

   ++s;

   --k;

  }while(k>-1);

  ++i;

}while(i<9);

}

void __fastcall TForm1::FormCreate(TObject *Sender)

{

 init_First();

 init_Date();

 int i,j;

 for(i=0;i<9;i++)

 {

for(j=0;j<9;j++)

{

StringGrid1->Cells[j][i]=IntToStr(date[i][j]);

     }

 }

}