第四章串 4.10 void String reverse( Stringtype s, Stringtype&r求s的逆串r Strassen(r;),∥初始化r为空串 for(sTrlen(s); ri-) StrAssign(c, SubString(s, i, 1)); Strassignt( r Concat(r,c),∥把s的字符从后往前添加到r中 i//String Reverse 4.11 void String Subtract( Stringtype s, Stringtype t, Stringtype&ry求所有包含在串s中 而t中没有的字符构成的新串r StrAssign(r, ); for(Fl; iStrlen(t) StrAssign(r, Concat(r, c)); }/f 1//String Subtract 4.12 int Replace( Stringtype&S, Stringtype T, Stringtype V),∥将串S中所有子串T替换为 V并返回置换次数 for(n=0=1i<= Strler(S) Strlen(T+1i+)∥注意i的取值范围 if( StrCompare( Substring(s, i Strlen(m)T)∥找到了与T匹配的子串 {/分别把T的前面和后面部分保存为head和tail StrAssign(head, SubString(s, 1, i-D)); StrAssign(tail, SubString(S, i+ Strlen(T), Strlen(S)-i-Strlen(T)+1))
第四章 串 4.10 void String_Reverse(Stringtype s,Stringtype &r)//求 s 的逆串 r { StrAssign(r,''); //初始化 r 为空串 for(i=Strlen(s);i;i--) { StrAssign(c,SubString(s,i,1)); StrAssign(r,Concat(r,c)); //把 s 的字符从后往前添加到 r 中 } }//String_Reverse 4.11 void String_Subtract(Stringtype s,Stringtype t,Stringtype &r)//求所有包含在串 s 中 而 t 中没有的字符构成的新串 r { StrAssign(r,''); for(i=1;iStrlen(t)) StrAssign(r,Concat(r,c)); } }//for }//String_Subtract 4.12 int Replace(Stringtype &S,Stringtype T,Stringtype V);//将串 S 中所有子串 T 替换为 V,并返回置换次数 { for(n=0,i=1;i<=Strlen(S)-Strlen(T)+1;i++) //注意 i 的取值范围 if(!StrCompare(SubString(S,i,Strlen(T)),T)) //找到了与 T 匹配的子串 { //分别把 T 的前面和后面部分保存为 head 和 tail StrAssign(head,SubString(S,1,i-1)); StrAssign(tail,SubString(S,i+Strlen(T),Strlen(S)-i-Strlen(T)+1));
StrAssign(S, Concat(head, V); Strassign( S Concat(S,tail),∥把head,v,tail连接为新串 i+= Strlen(V;∥当前指针跳到插入串以后 i//Replace 分析i= Strlen(V)这一句是必需的也是容易忽略的如省掉这一句,则在某些情况 下会引起不希望的后果虽然在大多数情况下没有影响请思考:设S= place, T=ace',v=face’,则省掉计= Strlen(V),运行时会出现什么结果? 4.13 int Delete Substring( Stringtype&s, Stringtype ty/从串s中删除所有与t相同的子串, 并返回删除次数 for(n=, F1; K=Strlen(s)-Strlen(t)+1; i++) if(StrCompare(SubString (s, i, Strlen(t), t)) StrAssign(head, SubString(S, 1, i-1)); StrAssign(tail, SubString (S, i+Strlen(t),Strlen(s)-i-Strlen(t)+1) StrAssign(S, Concat( head tail),∥把 head tail连接为新串 n++ return n i//Delete SubString 4.14 Status nibolan to bolan( Stringtype str, Stringtype&newM∥/把前缀表达式str转换 为后缀式new Initstack(s),/的元素为 Stringtype类型 for(Fl; i<=Strlen(str); i++) sUbsTring (str, i, 1) ifr.字母) push(sr els if(StackEmpty(s))return ERROR pop(s, a); if(Stack Empty(s) return ERROR pop(s, b) StrAssign(t, Concat(r, b); Strassign( c, Concat(t;a);∥把算符r子前缀表达式ab连接为新子前缀表达
StrAssign(S,Concat(head,V)); StrAssign(S,Concat(S,tail)); //把 head,V,tail 连接为新串 i+=Strlen(V); //当前指针跳到插入串以后 n++; }//if return n; }//Replace 分析:i+=Strlen(V);这一句是必需的,也是容易忽略的.如省掉这一句,则在某些情况 下,会引起不希望的后果,虽然在大多数情况下没有影响.请思考:设 S='place', T='ace', V='face',则省掉 i+=Strlen(V);运行时会出现什么结果? 4.13 int Delete_SubString(Stringtype &s,Stringtype t)//从串s中删除所有与t相同的子串, 并返回删除次数 { for(n=0,i=1;i<=Strlen(s)-Strlen(t)+1;i++) if(!StrCompare(SubString(s,i,Strlen(t)),t)) { StrAssign(head,SubString(S,1,i-1)); StrAssign(tail,SubString(S,i+Strlen(t),Strlen(s)-i-Strlen(t)+1)); StrAssign(S,Concat(head,tail)); //把 head,tail 连接为新串 n++; }//if return n, }//Delete_SubString 4.14 Status NiBoLan_to_BoLan(Stringtype str,Stringtype &new)//把前缀表达式 str 转换 为后缀式 new { Initstack(s); //s 的元素为 Stringtype 类型 for(i=1;i<=Strlen(str);i++) { r=SubString(str,i,1); if(r 为字母) push(s,r); else { if(StackEmpty(s)) return ERROR; pop(s,a); if(StackEmpty(s)) return ERROR; pop(s,b); StrAssign(t,Concat(r,b)); StrAssign(c,Concat(t,a)); //把算符 r,子前缀表达式 a,b 连接为新子前缀表达
式 i//for pop(s, new) if(! Stack Empty(s)) return ERROR; return OK i /NiBoLan to BoLan 分析:基本思想见书后注释3.23请读者用此程序取代作者早些时候对3.23题给出 的程序 4.15 void StrAssign( Stringtype& Tchar chars.&#;y用字符数组 chars给串T赋 值 Stringtype的定义见课本 for(F0, T[O0; chars; T[0H+, i++)T[i+1=charsi i//StrAssign 4.16 char StrCompare( Stringtype s, Stringtype t)/串的比较,st时返回正数s=t时返回 0,st时返回负数 for(=1is[O]&&it[oD return 0 else if(i>s[o] return-t[; else if(it[OD) return s[ else return s[l-t[] i//StrCompare 4.17 int String Replace( Stringtype&S, Stringtype T, Stringtype V)∥将串S中所有子串T 替换为V,并返回置换次数 for(n=0,F=1;iToj)∥找到了与T匹配的子串分三种情况处理 if(TOF=VOD for(l=1}k<=T0]H+)∥新子串长度与原子串相同时直接替换 SHI-1=V else if((To}<V[0)新子串长度大于原子串时先将后部右移
式 c push(s,c); } }//for pop(s,new); if(!StackEmpty(s)) return ERROR; return OK; }//NiBoLan_to_BoLan 分析:基本思想见书后注释 3.23.请读者用此程序取代作者早些时候对 3.23 题给出 的程序. 4.15 void StrAssign(Stringtype &T,char chars&#;)//用字符数组 chars 给串 T 赋 值,Stringtype 的定义见课本 { for(i=0,T[0]=0;chars[i];T[0]++,i++) T[i+1]=chars[i]; }//StrAssign 4.16 char StrCompare(Stringtype s,Stringtype t)//串的比较,s>t 时返回正数,s=t 时返回 0,ss[0]&&i>t[0]) return 0; else if(i>s[0]) return -t[i]; else if(i>t[0]) return s[i]; else return s[i]-t[i]; }//StrCompare 4.17 int String_Replace(Stringtype &S,Stringtype T,Stringtype V);//将串 S 中所有子串 T 替换为 V,并返回置换次数 { for(n=0,i=1;iT[0]) //找到了与 T 匹配的子串:分三种情况处理 { if(T[0]==V[0]) for(l=1;l<=T[0];l++) //新子串长度与原子串相同时:直接替换 S[i+l-1]=V[l]; else if(T[0]<V[0]) //新子串长度大于原子串时:先将后部右移
for(=S(O; I>=i+T[]: 1-) S[+VIOJ-TIOJSU; for(=1k<=V[o]++) else/新子串长度小于原子串时先将后部左移 for(l=i+V[O K<=S[0+VIOJ-T[O]: 1++) S[S[-VIOF+TIOII for(l-1; K=V[O]: 1++) S[OFS[OJ-T[OJ VION i+=V[O]: n++ eturn n: i//String Replace 4.18 typedef struct i char ch Int num s mytype void StrAnalyze( Stringtype S)/统计串S中字符的种类和个数 mytype TIMAXSIZE〃用结构数组T存储统计结果 for(=1<=S[];i++) c=S[j严=0 while(]ch&&li]chl=c)j++,∥查找当前字符c是否已记录过 if(TT]. ch) TL.num+ else Tu(c, 1) for(0, T0. ch; j++) printf("%c: %dn",TU].ch,TG]. num) i//Stranalyze 4.19 void subtract string( Stringtype s, Stringtype t, Stringtype&ry求所有包含在串s中 而t中没有的字符构成的新串r
{ for(l=S[0];l>=i+T[0];l--) S[l+V[0]-T[0]]=S[l]; for(l=1;l<=V[0];l++) S[i+l-1]=V[l]; } else //新子串长度小于原子串时:先将后部左移 { for(l=i+V[0];l<=S[0]+V[0]-T[0];l++) S[l]=S[l-V[0]+T[0]]; for(l=1;l<=V[0];l++) S[i+l-1]=V[l]; } S[0]=S[0]-T[0]+V[0]; i+=V[0];n++; }//if }//for return n; }//String_Replace 4.18 typedef struct { char ch; int num; } mytype; void StrAnalyze(Stringtype S)//统计串 S 中字符的种类和个数 { mytype T[MAXSIZE]; //用结构数组 T 存储统计结果 for(i=1;i<=S[0];i++) { c=S[i];j=0; while(T[j].ch&&T[j].ch!=c) j++; //查找当前字符 c 是否已记录过 if(T[j].ch) T[j].num++; else T[j]={c,1}; }//for for(j=0;T[j].ch;j++) printf("%c: %d\n",T[j].ch,T[j].num); }//StrAnalyze 4.19 void Subtract_String(Stringtype s,Stringtype t,Stringtype &r)//求所有包含在串 s 中 而 t 中没有的字符构成的新串 r {
r[o}=0 for(Fl; Kt[OD[++r[OJ=c }/f 3//Subtract String 4.20 int SubString Delete( Stringtype&s, Stringtype ty/从串s中删除所有与t相同的子串, 并返回删除次数 for(n=0,=1;im)∥找到了与t匹配的子串 fo(k=iknext; p p=p->next) r=(LStrNode*)malloc(sizeof(LStrNode): q->next=r, q
r[0]=0; for(i=1;it[0]) r[++r[0]]=c; } }//for }//Subtract_String 4.20 int SubString_Delete(Stringtype &s,Stringtype t)//从串s中删除所有与t相同的子串, 并返回删除次数 { for(n=0,i=1;im) //找到了与 t 匹配的子串 { for(k=i;knext;p;p=p->next) { r=(LStrNode*)malloc(sizeof(LStrNode)); r->ch=p->ch; q->next=r;q=r; }
q->next=NULL i//String Assign void String Copy( STring& cs, STring ty/把串t复制为串s.与前一个程序的区别在于, 串s业己存在 for(p=s->next, q=t->next p&&q: p=p->next, q=q->next) p->ch=q->ch, pre=p: while(g) p=(LStrNode*)malloc(sizeof(LStrNode)); p- pre->nextp, pre-p p->next=NULL i //String Copy char String Compare(LString S, LString t)/串的比较,s>t时返回正数s=t时返回0st 时返回负数 for(p=s->next, q=t->next p&&q&&p->ch=q->ch, p=p->next, q=q->next) if(p&&! q) return 0; else if(p)return-(q->ch); else if(!q) return p->ch i//String Compare Int Stringlen( STring s)求串s的长度(元素个数) for(i-O, P=s->next p p=p->next, 1++); return 1, STring* Conca( String s, STring t)/连接串s和串t形成新串,并返回指针 p=malloc(sizeof(LStrNode)) for(q=p, r=s->next r, r=r->next) q->next=(LStrNode*)malloc(sizeof(LStrNode)) q=q->next chr->ch }/for/复制串 for(rt->next r rr->next)
q->next=NULL; }//StringAssign void StringCopy(LString &s,LString t)//把串 t 复制为串 s.与前一个程序的区别在于, 串 s 业已存在. { for(p=s->next,q=t->next;p&&q;p=p->next,q=q->next) { p->ch=q->ch;pre=p; } while(q) { p=(LStrNode*)malloc(sizeof(LStrNode)); p->ch=q->ch; pre->next=p;pre=p; } p->next=NULL; }//StringCopy char StringCompare(LString s,LString t)//串的比较,s>t 时返回正数,s=t 时返回 0,snext,q=t->next;p&&q&&p->ch==q->ch;p=p->next,q=q->next); if(!p&&!q) return 0; else if(!p) return -(q->ch); else if(!q) return p->ch; else return p->ch-q->ch; }//StringCompare int StringLen(LString s)//求串 s 的长度(元素个数) { for(i=0,p=s->next;p;p=p->next,i++); return i; }//StringLen LString * Concat(LString s,LString t)//连接串 s 和串 t 形成新串,并返回指针 { p=malloc(sizeof(LStrNode)); for(q=p,r=s->next;r;r=r->next) { q->next=(LStrNode*)malloc(sizeof(LStrNode)); q=q->next; q->ch=r->ch; }//for //复制串 s for(r=t->next;r;r=r->next)
q->next=(LStrNode*)malloc(sizeof(LStrNode) ∥for∥复制串t q->next=NULL i//Conca STring* Sub string( STring s, Int start, int len返回一个串,其值等于串s从 start 位置起长为len的子串 p=malloc(sizeof(LStrNode)); q=p; for(r= s' start; start-,r=r->next),∥找到 start所对应的结点指针r for(Fl; Knext) q->next=(LStrNode*)malloc(sizeof(LStrNode)); q=q->next }∥复制串t q->next=NULL return p, i//Sub String 4.22 void L String Concat( STring& tostring& s char c)∥用块链存储结构,把串s插入到 串t的字符c之后 p=t head while(p&&!(i= Find char(p,c))p=p>next,/查找字符c if(tp)∥没找到 t. taiI->next=s head t tai=stal,/把s连接在t的后面 q=p->next r=( Chunk*) malloc(sizeof( Chunk),∥将包含字符c的节点p分裂为两个 for(j=0j++)r->ch}#,∥原结点p包含c及其以前的部分 for(j=ijch01 ch]#;/的后半部分和r的前半部分的字符改为无效字符#
{ q->next=(LStrNode*)malloc(sizeof(LStrNode)); q=q->next; q->ch=r->ch; }//for //复制串 t q->next=NULL; return p; }//Concat LString * Sub_String(LString s,int start,int len)//返回一个串,其值等于串 s 从 start 位置起长为 len 的子串 { p=malloc(sizeof(LStrNode));q=p; for(r=s;start;start--,r=r->next); //找到 start 所对应的结点指针 r for(i=1;inext) { q->next=(LStrNode*)malloc(sizeof(LStrNode)); q=q->next; q->ch=r->ch; } //复制串 t q->next=NULL; return p; }//Sub_String 4.22 void LString_Concat(LString &t,LString &s,char c)//用块链存储结构,把串 s 插入到 串 t 的字符 c 之后 { p=t.head; while(p&&!(i=Find_Char(p,c))) p=p->next; //查找字符 c if(!p) //没找到 { t.tail->next=s.head; t.tail=s.tail; //把 s 连接在 t 的后面 } else { q=p->next; r=(Chunk*)malloc(sizeof(Chunk)); //将包含字符 c 的节点 p 分裂为两个 for(j=0;jch[j]='#'; //原结点 p 包含 c 及其以前的部分 for(j=i;jch[j]=p->ch[j]; p->ch[j]='#'; //p 的后半部分和 r 的前半部分的字符改为无效字符'#
p->next=s head xt=q;/把串s插入到结点p和r之间 i//else t curlen+= s curlen;∥修改串长 i//STring Concat int find chan( Chunk*p, char c在某个块中查找字符c如找到则返回位置是第几 个字符如没找到则返回0 for(F0; Kch0=c; i++) if(i-CHUNKSIZE)return 0 else retur计+1; i//Find Char nt L string palindrome( LString Ly判断以块链结构存储的串L是否为回文序列, 是则返回1,否则返回 Init Stack(S); p= Shead: i=0k=1;指示元素在块中的下标k指示元素在整个序列中的序号 (从1开始) for(k=1; kch[j),∥将前半段的字符入串 else if(k>(Scurlen+ 1)2) Pop(Sc),/将后半段的字符与栈中的元素相匹配 ifp->ch[]=c) return0,∥失配 f(+i= CHUNKSIZE)/转到下一个元素当为块中最后一个元素时转到下 块 next etum1;∥成功匹配 M//STring_ Palindrome 4.24
} p->next=s.head; s.tail->next=r; r->next=q; //把串 s 插入到结点 p 和 r 之间 }//else t.curlen+=s.curlen; //修改串长 s.curlen=0; }//LString_Concat int Find_Char(Chunk *p,char c)//在某个块中查找字符 c,如找到则返回位置是第几 个字符,如没找到则返回 0 { for(i=0;ich[i]!=c;i++); if(i==CHUNKSIZE) return 0; else return i+1; }//Find_Char 4.23 int LString_Palindrome(LString L)//判断以块链结构存储的串 L 是否为回文序列, 是则返回 1,否则返回 0 { InitStack(S); p=S.head;i=0;k=1; //i 指示元素在块中的下标,k 指示元素在整个序列中的序号 (从 1 开始) for(k=1;kch[i]); //将前半段的字符入串 else if(k>(S.curlen+1)/2) { Pop(S,c); //将后半段的字符与栈中的元素相匹配 if(p->ch[i]!=c) return 0; //失配 } if(++i==CHUNKSIZE) //转到下一个元素,当为块中最后一个元素时,转到下 一块 { p=p->next; i=0; } }//for return 1; //成功匹配 }//LString_Palindrome 4.24
void HString Concat(( HString sl, HString s2, HString&将堆结构表示的串s1和s2 连接为新串 if(t ch)free(t ch); tch=malloc((sl length+s2. length) *sizeof(char) for(F=1; =i+T length s ch[I+V.length-Tlength]=Sch[U]; for(=0; KVlength; I++) S[+V[ else/新子串长度小于原子串时先将后部左移 for(l=i+Vlength; K<S length+V. length-Tlength; 1++) sch[U-S. ch[l-V length+Tlength]; for(I=0; KV.length:; H++) [+!=V; S length+=V. length-T.length; i+=Vlength, n+ i//if i//for return n i//HString Replace 4.26
void HString_Concat(HString s1,HString s2,HString &t)//将堆结构表示的串 s1 和 s2 连接为新串 t { if(t.ch) free(t.ch); t.ch=malloc((s1.length+s2.length)*sizeof(char)); for(i=1;i=i+T.length;l--) S.ch[l+V.length-T.length]=S.ch[l]; for(l=0;l<V.length;l++) S[i+l]=V[l]; } else //新子串长度小于原子串时:先将后部左移 { for(l=i+V.length;l<S.length+V.length-T.length;l++) S.ch[l]=S.ch[l-V.length+T.length]; for(l=0;l<V.length;l++) S[i+l]=V[l]; } S.length+=V.length-T.length; i+=V.length;n++; }//if }//for return n; }//HString_Replace 4.26
Status HString Insert(( HString&S, int pos, HString T∥把T插入堆结构表示的串S的 第pos个字符之前 if(posS length)pos- S length+1/当插入位置大于串长时,看作添加在串尾 Sch=realloc(sch, (S length+T length) *sizeof(char)); for(FS length-l >=pos-1; i--) Sch[i+ Length}=Sch[i∥后移为插入字符串让出位置 for(0; Ksucc) f(q=Tlp->data=q->data
Status HString_Insert(HString &S,int pos,HString T)//把 T插入堆结构表示的串S的 第 pos 个字符之前 { if(posS.length) pos=S.length+1;//当插入位置大于串长时,看作添加在串尾 S.ch=realloc(S.ch,(S.length+T.length)*sizeof(char)); for(i=S.length-1;i>=pos-1;i--) S.ch[i+T.length]=S.ch[i]; //后移为插入字符串让出位置 for(i=0;it[0]) return i-t[0]; }//Index_New 4.28 void LGet_next(LString &T)//链串上的 get_next 算法 { p=T->succ;p->next=T;q=T; while(p->succ) { if(q==T||p->data==q->data) { p=p->succ;q=q->succ; p->next=q;