NOIP基础数据结构.pptVIP

Pascal语言 //宽度优先有哪些信誉好的足球投注网站 procedure BFS(); Var i,head,tail:integer; begin head:=1; tail:=1; queue[1]:=1; v[1].rank:=1; while(tail=head) do begin i:=adj[ queue[tail] ]; while i-1 do begin inc(head); queue[head]:=i; v[i].rank:=v[queue[tail]].rank+1; i:=v[i].next; end; inc(tail); end; end; C++语言 //宽度优先有哪些信誉好的足球投注网站 void BFS() { int i, head, tail; head= tail= 1; v[1].rank= queue[1] = 1; for( ; tail=head; tail++) { int vv= queue[tail]; for(i= adj[vv];i!=-1; i=v[i].next) { queue[++head] = i; v[i].rank= v[ vv ].rank+1; } } } 树 公司级别完整程序（数组） Pascal语言 procedure calc(); //统计 var i,maxR :integer; begin for i:=1 to n do inc(c[v[i].rank]); maxR:=1; maxC:=1; for i:=1 to n do if(c[i]maxC) then begin maxC:=c[i]; maxR:=i; end; Sum:=0; maxRank:=1; for i:=1 to n do begin if (v[i].rank=maxR) then Sum:=Sum+v[i].id; if v[i].rankmaxRank then maxRank:=v[i].rank; end; end; C++语言 void calc() //统计 { int i,maxR; for(i=1; i=n; i++) c[v[i].rank]++; maxR=maxC=1; for (i=1; i=n; i++) if(c[i]maxC) { maxC=c[i], maxR=i;} Sum=0; maxRank=1; for(i=1; i=n ;i++) { if (v[i].rank == maxR) Sum += v[i].id; if (v[i].rankmaxRank) maxRank=v[i].rank; } } 树 公司级别完整程序（数组） Pascal语言 //主程序 begin assign(input,‘1.in); reset(input); assign(output,‘1.out); rewrite(output); init(); BFS(); // 或用 DFS(1,1) calc(); writeln(maxRank); writeln(maxC, ,Sum); close(output); close(input); end. C++语言 //主程序 int main () { freopen(e.in,r,stdin); freopen(e.out,w,stdout); init(); BFS(); // 或用 DFS(1,1) calc(); cout maxRank endl; cout maxC Sum endl; } 树 公司级别完整程序（数组） 树的练习 图 1、求树中度最大的结点。 2、求