Сумма модулей элементов массива, после наименьшего по модулю элемента

m1=fabs(a[0]);
  for (i=0; i<=n; i++)
    if (fabs(a[i])<m1){ m1=fabs(a[i]);}
 
 
 
  for (i=0; i>m1; i++)
    s=s+fabs(a[i]);

int main()
{
    int arr[] = { 5, 1, 9, -2, 16, 1, 2, -1 }; 
    unsigned min( abs( arr[0] ) );
    std::vector< unsigned > idx;
 
    idx.push_back( 0 );
    for( unsigned i( 1 ), tmp; i < 8; ++i )
    {
        tmp = abs( arr[i] );
        if( tmp > min )
        {
            continue;
        }    
        if( tmp < min )
        {
            min = tmp;
            idx.clear( );
        }
        idx.push_back( i );
    }
    cout << "количество минимальных модулей = " << idx.size( ) << endl << "Их индексы: ";
    std::copy( idx.begin( ), idx.end( ), std::ostream_iterator < unsigned > ( cout, " " ) );
}

double a[100],s;
 int i,m1,m2,kol;
 
  for (i=0; i<n; i++)
    a[i]=StrToFloat(StringGrid1->Cells[i][0]);
 
  m1=fabs(a[0]);
  for (i=1; i<=n-1; i++)
    if (fabs(a[i])<m1){ m1=fabs(a[i]); m2=i;}
    if (m2==n-1) {Label2->Caption="ìèíèìàëüíûé ýëåìåíò ïîñëåäíèé â ìàññèâå"; return;}
  for(i=0; i<=n; i++)
     if(a[i]=m1){kol++;}
     if(kol>=2){Label2->Caption="bolshe odngo elementa";}
 
       s=0;
  for (i=m2+1; i<=n-1; i++)
    s=s+fabs(a[i]);
 
  Label2->Caption="ñóììà ýëåìåíòîâ - "+FloatToStr(s)+"  min=  "+FloatToStr(m1);