【正文】 Build_AdjMulist(AMLGraph amp。 } //在 i 鏈表中刪除該邊 。 pjlink=qjlink。 if (!p) return ERROR。pjlinkivex!=i。pamp。 } //在 i 鏈表中刪除該邊 if([j].firstedgeivex==i) [j].firstedge=[j].firstedgejlink。 if (!p) return ERROR。pilinkjvex!=j。pamp。 if([i].firstedgejvex==j) [i].firstedge=[i].firstedgeilink。G,char v,char w)////在鄰接多重表表示的圖 G上刪除邊 (v,w) { if((i=LocateVex(G,v))0) return ERROR。 return OK。p=ptlink) ptailvex。 for(p=[i].firstout。p。i++) //順次用結點 m之后的頂點 取代前一個頂點 { [i]=[i+1]。 } }//else }//for for(i=m。 ptlink=qtlink。p=ptlink)。amp。 } else //否則 { for(p=[i].firstout。 [i].firstout=qtlink。in。 free(q)。 if(p) { q=phlink。phlinktailvex!=m。pamp。 free(q)。i++) //刪除所有以 v為頭的邊 { if([i].firstintailvex==m) //如果待刪除的邊 是頭鏈上的第一個結點 { q=[i].firstin。 for(i=0。G,char v)//在十字鏈表表示的圖 G上刪除頂點 v { if((m=LocateVex(G,v))0) return ERROR。 return OK。 //邊已經存在 qnextarc=p。qqnextarc。 if(![i].firstarc) [i].firstarc=p。 padjvex=j。 if((j=LocateVex(G,w))0) return ERROR。 }//Delete_Arc //為節(jié)省篇幅 ,本題只給出 Insert_Arc 算法 .其余算法請自行寫出 . Status Insert_Arc(ALGraph amp。 。 if((j=LocateVex(G,w))0) return ERROR。 }//Delete_Vex 分析 :如果不把待刪除頂點交換到最后一個頂點的話 ,算法 將會比較復雜 ,而伴隨著大量元素的移動 ,時間復雜度也會大大增加 . Status Delete_Arc(MGraph amp。 。 [m][i]=[n][i]。in。 [m][n]。G,char v)//在鄰接矩陣表示的圖 G上刪除頂點 v { n=。 } return OK。 if(![i][j].adj) { [i][j].adj=1。 if((j=LocateVex(G,w))0) return ERROR。 }//Insert_Vex Status Insert_Arc(MGraph amp。 [++]=v。 }//Build_AdjList //本題中的圖 G均為有向無權圖 ,其余情況容易由此寫出 Status Insert_Vex(MGraph amp。pnextarc=NULL。 qnextarc=p。qnextarc。 if(!.[i].firstarc) [i].firstarc=p。 if((j=LocateVex(G,h))0) return ERROR。h=getchar()。m=a。m++) [m].data=getchar()。 for(m=0。 if(a0) return ERROR。 scanf(%d,amp。 if(v0) return ERROR。 scanf(%d,amp。第七章 圖 Status Build_AdjList(ALGraph amp。G)//輸入有向圖的頂點數 ,邊數 ,頂點信息和邊的信息建立鄰接表 { InitALGraph(G)。v)。 //頂點數不能為負 =v。a)。 //邊數不能為負 =a。mv。 //輸入各頂點的符號 for(m=1。m++) { t=getchar()。 //t為弧尾 ,h為弧頭 if((i=LocateVex(G,t))0) return ERROR。 //頂點未找到 p=(ArcNode*)malloc(sizeof(ArcNode))。 else { for(q=[i].firstarc。q=qnextarc)。 } padjvex=j。 }//while return OK。G, char v)//在鄰接矩陣表示的圖 G上插入頂點 v { if(+1)MAX_VERTEX_NUM return INFEASIBLE。 return OK。G,char v,char w)//在鄰接矩陣表示的圖 G上插入邊(v,w) { if((i=LocateVex(G,v))0) return ERROR。 if(i==j) return ERROR。 ++。 }//Insert_Arc Status Delete_Vex(MGraph amp。 if((m=LocateVex(G,v))0) return ERROR。 //將待刪除頂點交換到最后一個頂點 for(i=0。i++) { [i][m]=[i][n]。 //將邊的關系隨之交換 } [m][m].adj=0。 return OK。G,char v,char w)//在鄰接矩陣表示的圖 G上刪除邊(v,w) { if((i=LocateVex(G,v))0) return ERROR。 if([i][j].adj) { [i][j].adj=0。 } return OK。G,char v,char w)//在鄰接表表示的圖 G上插入邊 (v,w) { if((i=LocateVex(G,v))0) return ERROR。 p=(ArcNode*)malloc(sizeof(ArcNode))。pnextarc=NULL。 else { for(q=[i].firstarc。q=qnextarc) if(qadjvex==j) return ERROR。 } ++。 }//Insert_Arc //為節(jié)省篇幅 ,本題只給出較為復雜的 Delete_Vex算法 .其余算法請自行寫出 . Status Delete_Vex(OLGraph amp。 n=。in。 [i].firstin=qhlink。 } else //否則 { for(p=[i].firstin。amp。p=phlink)。 phlink=qhlink。 } }//else }//for for(i=0。i++) //刪除所有以 v為尾的邊 { if([i].firstoutheadvex==m) //如果待刪除的邊是尾鏈上的第一個結點 { q=[i].firstout。 free(q)。pamp。ptlinkheadvex!=m。 if(p) { q=ptlink。 free(q)。in。 //修改表頭向量 for(p=[i].firstin。p=phlink) pheadvex。p。 //修改各鏈中的頂點序號 } 。 }//Delete_Vex //為節(jié)省篇幅 ,本題只給出 Delete_Arc 算法 .其余算法請自行寫出 . Status Delete_Arc(AMLGraph amp。 if((j=LocateVex(G,w))0) return ERROR。 else { for(p=[i].firstedge。amp。p=pilink)。 //未找到 pilink=pilinkilink。 else { for(p=[j].firstedge。amp。p=pjlink)。 //未找到 q=pjlink。 free(q)。 return OK。G)//輸入有向圖的頂點數 ,邊數 ,頂點信息和邊的信息建立鄰接多重表 { InitAMLGraph(G)。v)。 //頂點數不能為負 =v。a)。 //邊數不能為負 =a。mv。 //輸入各頂點的符號 for(m=1。m++) {