例程：最大子段和

“最大子段和” 

Int MaxSubsequenceSum( const   int  A[],  int  N) 
... { 
       int ThisSum, MaxSum, j; 
       ThisSum = MaxSum = 0; 
       For(j=0; j  < N; j++) 
       ...{ 
             ThisSum += A[j]; 
             If (ThisSum  > MaxSum) 
                     MaxSum = ThisSum; 
              Else if(ThisSum  < 0) 
                     ThisSum = 0; 
      } 
      return MaxSum; 
}