1611: [Usaco2008 Feb]Meteor Shower流星雨

标签：

1611: [Usaco2008 Feb]Meteor Shower流星雨

Time Limit: 5 Sec Memory Limit: 64 MB
Submit: 1010 Solved: 446
[Submit][Status][Discuss]

Description

去年偶们湖南遭受N年不遇到冰冻灾害，现在芙蓉哥哥则听说另一个骇人听闻的消息：一场流星雨即将袭击整个霸中，由于流星体积过大，它们无法在撞击到地面前燃烧殆尽，届时将会对它撞到的一切东西造成毁灭性的打击。很自然地，芙蓉哥哥开始担心自己的安全问题。以霸中至In型男名誉起誓，他一定要在被流星砸到前，到达一个安全的地方（也就是说，一块不会被任何流星砸到的土地）。如果将霸中放入一个直角坐标系中，芙蓉哥哥现在的位置是原点，并且，芙蓉哥哥不能踏上一块被流星砸过的土地。根据预报，一共有M颗流星(1 <= M <= 50,000)会坠落在霸中上，其中第i颗流星会在时刻 T_i (0 <= T_i <= 1,000)砸在坐标为(X_i, Y_i) (0 <= X_i <= 300；0 <= Y_i <= 300) 的格子里。流星的力量会将它所在的格子，以及周围4个相邻的格子都化为焦土，当然芙蓉哥哥也无法再在这些格子上行走。芙蓉哥哥在时刻0开始行动，它只能在第一象限中，平行于坐标轴行动，每1个时刻中，她能移动到相邻的（一般是4个）格子中的任意一个，当然目标格子要没有被烧焦才行。如果一个格子在时刻t被流星撞击或烧焦，那么芙蓉哥哥只能在t之前的时刻在这个格子里出现。请你计算一下，芙蓉哥哥最少需要多少时间才能到达一个安全的格子。

Input

* 第1行: 1个正整数：M * 第2..M+1行: 第i+1行为3个用空格隔开的整数：X_i，Y_i，以及T_i

Output

输出1个整数，即芙蓉哥哥逃生所花的最少时间。如果芙蓉哥哥无论如何都无法在流星雨中存活下来，输出-1

Sample Input

4
0 0 2
2 1 2
1 1 2
0 3 5
输入说明:
一共有4颗流星将坠落在霸中，它们落地点的坐标分别是(0, 0)，(2, 1)，(1, 1)
以及(0, 3)，时刻分别为2，2，2，5。

t = 0 t = 2 t = 5
5|. . . . . . . 5|. . . . . . . 5|. . . . . . .
4|. . . . . . . 4|. . . . . . . 4|# . . . . . .
* = 流星落点
3|. . . . . . . 3|. . . . . . . 3|* # . . . . .
2|. . . . . . . 2|. # # . . . . 2|# # # . . . .
# = 行走禁区
1|. . . . . . . 1|# * * # . . . 1|# # # # . . .
0|B . . . . . . 0|* # # . . . . 0|# # # . . . .
-------------- -------------- --------------
0 1 2 3 4 5 6 0 1 2 3 4 5 6 0 1 2 3 4 5 6

Sample Output

5
输出说明:
如果我们观察在t=5时的霸中，可以发现离芙蓉哥哥最近的安全的格子是
(3,0)——不过由于早在第二颗流星落地时，芙蓉哥哥直接跑去(3,0)的路线就被封死了。
离芙蓉哥哥第二近的安全格子为(4,0)，但它的情况也跟(3,0)一样。再接下来的格子就是在
(0,5)-(5,0)这条直线上。在这些格子中，(0,5)，(1,4)以及(2,3)都能在5个单位时间内到达。

5|. . . . . . .
4|. . . . . . .
3|3 4 5 . . . . 某个合法的逃生方案中
2|2 . . . . . . 芙蓉哥哥每个时刻所在地点
1|1 . . . . . .
0|0 . . . . . .
--------------
0 1 2 3 4 5 6

HINT

Source

Silver

题解：刷了这么久的bzoj才发现原来第7页还有这么一道大水题。。。感觉自己弱弱哒

直接BFS搞定

 1 /**************************************************************
 2     Problem: 1611
 3     User: HansBug
 4     Language: Pascal
 5     Result: Accepted
 6     Time:140 ms
 7     Memory:2976 kb
 8 ****************************************************************/
 9  
10  
11 const di:array[1..4,1..2] of longint=((1,0),(-1,0),(0,1),(0,-1));
12 var
13    i,j,k,l,m,n,x,y,a1,a2,a3,a4,f,r:longint;
14    a,b:array[-1..500,-1..500] of longint;
15    d:array[0..100000,1..2] of longint;
16 begin
17      fillchar(a,sizeof(a),0);
18      fillchar(b,sizeof(b),0);
19      readln(m);
20      for i:=1 to m do
21          begin
22               readln(j,k,l);inc(l);
23               if (b[j-1,k]=0) or (b[j-1,k]>l) then b[j-1,k]:=l;
24               if (b[j+1,k]=0) or (b[j+1,k]>l) then b[j+1,k]:=l;
25               if (b[j,k-1]=0) or (b[j,k-1]>l) then b[j,k-1]:=l;
26               if (b[j,k+1]=0) or (b[j,k+1]>l) then b[j,k+1]:=l;
27               if (b[j,k]=0) or (b[j,k]>l) then b[j,k]:=l;
28          end;
29      f:=1;r:=2;d[1,1]:=0;d[1,2]:=0;a[0,0]:=1;
30      if b[0,0]<=1 then
31         begin
32              writeln(-1);
33              halt;
34         end;
35      while f<r do
36            begin
37                 for i:=1 to 4 do
38                     begin
39                          x:=d[f,1]+di[i,1];
40                          y:=d[f,2]+di[i,2];
41                          if (x<0) or (y<0) then continue;
42                          if (a[x,y]=0) and (((a[d[f,1],d[f,2]]+1)<b[x,y]) or (b[x,y]=0)) then
43                             begin
44                                  a[x,y]:=a[d[f,1],d[f,2]]+1;
45                                  if b[x,y]=0 then
46                                     begin
47                                          writeln(a[x,y]-1);
48                                          halt;
49                                     end;
50                                  d[r,1]:=x;d[r,2]:=y;
51                                  inc(r);
52                             end;
53                     end;
54                 inc(f);
55            end;
56      writeln(-1);
57 end.

1611: [Usaco2008 Feb]Meteor Shower流星雨

标签：

原文地址：http://www.cnblogs.com/HansBug/p/4394956.html