算法 5.1
int Index (String S, String T, int pos) {
      // T為非空串。若主串S中第pos個字符之后存在與T相等的子串，
      // 則返回第一個這樣的子串在S中的位置，否則返回-1
      if (pos > =0) {
         n = StrLength(S);  m = StrLength(T);  i = pos;
         while ( i <= n-m) {
           SubString (sub, S, i, m);
           if (StrCompare(sub,T) != 0)   ++i ;
           else return i ;
        } // while
      } // if
      return -1;                    // S中不存在與T相等的子串
} // Index