Алгоритм нахождения двух минимумов одним циклом

int A[] = {2,-3,4,1,7,12,10};

    int min1;
    int min2;

    if(A[0] > A[1])
    {
        min1 = A[1];
        min2 = A[0];
    }
    else
    {
        min1 = A[0];
        min2 = A[1];
    }

    for(int i = 2; i < 7; ++i)
    {
        if( A < min1)
        {
// предыдущий min надо сбросить в min2, т.к. очевидно min1 <= min2 всегда
            min2 = min1;  
            min1 = A;
        }
        else if(A < min2) min2 = A;
    }

m1 := a[0];
      m2 := a[1];

      for i := 2 to N - 1 do begin

        if m1 > m2 then swap(m1, m2);
        if m2 > a then m2 := a;

      end;