BFS-tyvj-分糖果

输入格式 Input Format
第一行为三个数n、p、c，为小朋友数、关系数和C小朋友的编号。
第二行为一个数m，表示小朋友吃糖的时间。
下面p行每行两个整数，表示某两个小朋友在彼此身旁
输出格式 Output Format
一个数，为所有小朋友都吃完了糖的时间
第四秒，2、4吃完了。
第五秒，3吃完了。所以答案是5。
分析：简单宽搜，重点在于如何把握数组范围。
代码：
var
n,m,c,max,time,k,i,j:longint;
a:array[1..100000,0..100] of longint;
//a[i,0]表示与第i个人相邻的总人数；a[i,j]表示与第i个人相邻的第j个人的编号
//记录编号
end;
end;
procedure bfs; //宽搜过程
var head,tail:longiail:=1;b[c]:=0;d[1]:=c;
v[c]:=true; // 初始化节点
max:=b[d[tail]];
end;
inc(head);
end;
writeln(max+time+1);//最大长度加一，表示传递至最后一个的时间
end;
begin
init;
bfs;
end.
tyvj 分糖果
2010年07月29日 星期四 下午 05:34 描述 Description
童年的我们，将和朋友分享美好的事物作为自己的快乐。这天，C小朋友得到了Plenty of candies，将要把这些糖果分给要好的朋友们。已知糖果从一个人传给另一个人需要1 秒的时间，同一个小朋友不会重复接受糖果。由于糖果足够多，如果某时刻某小朋友接受了糖果，他会将糖果分成若干份，分给那些在他身旁且还没有得到糖果的小朋友们，而且自己会吃一些糖果。由于嘴馋，小朋友们等不及将糖果发完，会在得到糖果后边吃边发。每个小朋友从接受糖果到吃完糖果需要m秒的时间。那么，如果第一秒C小朋友开始发糖，第多少秒所有小朋友都吃完了糖呢?
d[tail]:=a[d[head],i]; //加入新节点
v[d[tail]]:=true; //标记为已得到糖果
b[d[tail]]:=b[d[head]]+1;
if b[d[tail]]>max then // 寻找最大长度
while head<=tail do
begin
for i:= 1 to a[d[head],0] do //枚举与队首相邻的第i个人的编号
if not v[a[d[head],i]] then //表示未得到糖果
begin
inc(tail);
40%的数据满足：1<=n<=100
60%的数据满足：1<=n<=1000
100%的数据满足：1<=n<=100000
m<=n*(n-1)/2,不会有同一个关系被描述多次的情况。
【样例解释】
第一秒，糖在1手上。
第二秒，糖传到了2、4的手中。
第三秒，糖传到了3的手中，此时1吃完了。
样例输入 Sample Input
4 3 1
2
1 2
2 3
1 4
样例输出 Sample Output
5
时间限制 Time Limitation
各个测试点1s
注释 Hint
【限制】
begin;
readln(n,m,c);
readln(time);
for i:= 1 to m do
begin
readln(j,k);
inc(a[j,0]);inc(a[k,0]);
//第j，k个人所连人数递增
a[j,a[j,0]]:=k;a[k,a[k,0]]:=j;
b,d:array[1..100000] of longint;
//b[i]记录糖果传到第i个人的用时，d[i]记录节点对应某人的编号
v:array[1..100000] of boolean; //判重:false表示未传到
procedure init;