1.串联结 Concat(&T,S1,S2)的算法 status Concat(SString &T, SString Sl, SString S2) )T返回由串S1和S2联结而成的新串。若未被截断,则返回1;否则返回0。 if 0]= MAXSTRLEN( 未被截断 s1o=S11.s10 ∥/示意赋值,非C语句 0]+1.S10J+S2[0]=S2[1.S2[0],∥示意赋值 1[o]+S2[0 uncut Jelseif(s1o< MAXstrlend( ∥截断 SIOJ+I. MAXSTRLENI=S21. MAXSTRLEN-SI1OJI MAXSTRLEN uncut=0 }else{∥截断(仅取S1) TIO.. MAXSTRLENI-SI1O. MAXSTRLENI uncut=0 3//if return uncut }∥ Concat1.串联结 Concat(&T,S1,S2)的算法 status Concat(SString &T, SString S1, SString S2) {//用T返回由串S1和S2联结而成的新串。若未被截断,则返回1;否则返回0。 if ( S1[0]+S2[0] <= MAXSTRLEN) { //未被截断 T[1..S1[0]] = S1[1..S1[0]]; // 示意赋值，非C语句 T[S1[0]+1.. S1[0]+S2[0]] = S2[1..S2[0]]; // 示意赋值 T[0] = S1[0]+S2[0]; uncut = 1; }elseif (S1[0] < MAXSTRLEN) { // 截断 T[1..S1[0]] = S1[1..S1[0]]; T[S1[0]+1.. MAXSTRLEN] = S2[1.. MAXSTRLEN-S1[0]]; T[0] = MAXSTRLEN; uncut = 0; }else{ // 截断(仅取S1) T[0.. MAXSTRLEN] = S1[0.. MAXSTRLEN]; uncut = 0; } // if return uncut; } // Concat