您的位置:首页 > 其它

jzoj 1360. 【2011.12.31普及模拟】逃离洞穴

2016-07-21 11:23 316 查看

题目描述

小Z最近出去旅游,遇上倒霉事了。他和旅游团一起去游洞穴。这里有n个洞穴,编号为1到n。它们之间,有的有双向的小路相连,有的却没有,不过所有洞穴都通过小路连在了一起,没有任何两个洞穴不能相互到达。当游客们分散在各处的时候,忽然出了些故障,所有灯全部熄灭。这时广播响起,要求游客们迅速疏散。

有两个洞穴是出口,分别编号1和n,每个游客都选择最短的路线,从某一个出口逃离。所有的小路都是有长度的,而所有游客的速度都认为是1。

现在请问,在给定的T时间内,最多有多少人可以逃离。另一个问题,最慢的游客离开需要多少时间。

输入

第一行,三个整数,n,m和T,分别表示洞穴的数目,小路的数量和给定的逃离时间。

接下来m行,每行三个整数x,y和L,表示这条小路连接了编号为x和y的洞穴,而它的长度为L。x和y互不相同,且都在1到n之间。任何两个洞穴之间最多只有一条小路将它们直接相连。

下一行,一个整数k,表示游客的数量。

最后一行,k个整数,每个都在1到n之间,表示每个游客所在的洞穴(可能一个洞穴会有多个人)。

输出

输出两行,每行一个整数。第一行输出T时间内多少人可以逃离,第二行输出最慢的游客逃离洞穴所需要的时间。

思路

用Floyd求出最短路,然后进行一些判断就可以了

var
f:array[0..1000,0..1000] of longint;
i,j,k,n,m,s,t,x,y,z,max:longint;

function min(x,y:longint):longint;
begin
if x<=y then exit(x)
else exit(y);
end;

begin
assign(input,'escape.in'); reset(input);
assign(output,'escape.out'); rewrite(output);
readln(n,m,t);
for i:=1 to n do
for j:=1 to n do
f[i,j]:=maxlongint div 2;
for i:=1 to m do
begin
readln(x,y,z);
f[x,y]:=z;
f[y,x]:=z;
end;
for i:=1 to n do
f[i,i]:=0;
for k:=1 to n do
for i:=1 to n do
for j:=1
d3ef
to n do
if (i<>j) and (j<>k) and (k<>i) and (f[i,k]+f[k,j]<f[i,j])
then begin f[i,j]:=f[i,k]+f[k,j];  f[j,i]:=f[i,j]; end;
readln(k);

for i:=1 to k do
begin
read(x);
if (f[x,1]<=t) or (f[x,n]<=t) then
begin
inc(s);
if (f[x,1]<=t) and (f[x,n]<=t) then
begin
if max<min(f[x,1],f[x,n]) then max:=min(f[x,1],f[x,n]);
end
else begin
if f[x,1]<=t then
begin
if max<f[x,1] then max:=f[x,1];
end
else if max<f[x,n] then max:=f[x,n];
end
end
else begin if max<min(f[x,1],f[x,n]) then max:=min(f[x,1],f[x,n]); end;
end;
writeln(s);
writeln(max);
end.
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: