4.20.txt

来自「数据结构实验 如下： Status Fibonacci(int k, int」· 文本 代码 · 共 27 行

Status DelSub(SString &s, SString t)
/* 从串s中删除所有和串t匹配的子串。     */
/* 若有与t匹配的子串被删除，则返回TRUE；*/
/* 否则返回FALSE                        */
{
    int sign,i,j,k,len,lent;
    SString ans;
    k=1;
    lent=t[0]; 
    sign=0;
    for(i=1;i<=s[0];){
        j=1;
        if(i+lent-1<=s[0])
            while(j<=lent&&s[i+j-1]==t[j]) j++;
        if(j<=lent) ans[k++]=s[i++];
        else{
            sign=1;
            i+=lent;            
        }
    }
    ans[0]=k-1;
    if(!sign)  return FALSE;
    for(i=0;i<=k-1;i++)
        s[i]=ans[i];
    return TRUE;      
}