算法 3.5
void BubbleSort( SqList &L ){
    // 對順序表L作起泡排序,
    RcdType  W；
      i = L.length;
      while (i >1) {              // i>1 表明上一趟曾進行過記錄的交換
        lastExchangeIndex = 1;
        for (j = 1; j < i; j++){
          if (L.r[j+1].key < L.r[j].key) { 
            W=L.r[j]；L.r[j] =L.r[j+1]；L.r[j+1] = W；     // 互換記錄
            lastExchangeIndex = j;    
          } //if                      
        } //for
        i = lastExchangeIndex;   // 一趟排序中無序序列中最后一個記錄的位置
      } // while
} // BubbleSort