Минимальный и максимальный грузооборот

void __fastcall TForm1::FormCreate(TObject *Sender)
{
StringGrid1->Cells[0][0] = "Показники";
StringGrid1->Cells[0][2] = "ВВП,тис.грн";
StringGrid1->Cells[0][3] = "Вантажообіг, млн.т.км";
StringGrid1->Cells[3][0] = "2003";
StringGrid1->Cells[1][1] = "Січень";
StringGrid1->Cells[1][2] = "15021";
StringGrid1->Cells[1][3] = "34,4";
 StringGrid1->Cells[2][1] = "Лютий";
 StringGrid1->Cells[2][2] = "15562";
 StringGrid1->Cells[2][3] = "33,3";
  StringGrid1->Cells[3][1] = "Березень";
  StringGrid1->Cells[3][2] = "17763";
  StringGrid1->Cells[3][3] = "37,5";
   StringGrid1->Cells[4][1] = "Квітень";
   StringGrid1->Cells[4][2] = "18903";
   StringGrid1->Cells[4][3] = "37,7";
    StringGrid1->Cells[5][1] = "Травень";
    StringGrid1->Cells[5][2] = "18509";
    StringGrid1->Cells[5][3] = "38,6";
     StringGrid1->Cells[6][1] = "Червень";
     StringGrid1->Cells[6][2] = "19125";
     StringGrid1->Cells[6][3] = "38,4";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
//Итого
{
StringGrid1->ColCount=8;
StringGrid1->Cells[7][1] = "Итого";
int i;
float a;
a=0;
for (i=1;i<6;i++)
a=a+StrToInt(StringGrid1->Cells[i][2]);
StringGrid1->Cells[7][2] = a;
}
//---------------------------------------------------------------------------
 
 
//Грузооборот
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 int max=0;  int min=0; int kol; int i,j;
  for(int i=0;i<=5;i++)
  for(int j=0;j<=5;j++) {
   kol=kol+1;
if(StrToInt(StringGrid1->Cells[i][j])>max)
{
   max=StrToInt(StringGrid1->Cells[i][j]);
}
Label2->Caption=max;
 
}
min=StrToInt(StringGrid1->Cells[i][j]);
for(int i=0;i<=5;i++)
for(int j=0;j<=5;j++)
if(StrToInt(StringGrid1->Cells[i][j])<min)
{
   min=StrToInt(StringGrid1->Cells[i][j]);
}
Label1->Caption=min;
}