void TForm1::min()
 {
int eil = 0;  
int suma = 0;
  int maxsuma = 0; 
  for (int i=0; i<n; i++) {
       if (maxsuma > suma) {
           maxsuma = suma; 
           eil = i; }
  suma = 0;
  for (int j=0; j<n; j++)
       suma = suma + A[i][j];
}
ShowMessage(eil);
 }