码迷,mamicode.com
首页 > 其他好文 > 详细

bzoj3208: 花神的秒题计划Ⅰ

时间:2016-12-17 14:09:48      阅读:222      评论:0      收藏:0      [点我收藏+]

标签:max   back   bbs   array   not   记忆化   begin   路径   code   

3208: 花神的秒题计划Ⅰ

Time Limit: 16 Sec  Memory Limit: 128 MB
Submit: 691  Solved: 471
[Submit][Status][Discuss]

Description

 
背景【backboard】:
 Memphis等一群蒟蒻出题中,花神凑过来秒题……
 
描述【discribe】:
 花花山峰峦起伏,峰顶常年被雪,Memphis打算帮花花山风景区的人员开发一个滑雪项目。
 
 我们可以把风景区看作一个n*n的地图,每个点有它的初始高度,滑雪只能从高处往低处滑【严格大于】。但是由于地势经常变动【比如雪崩、滑坡】,高度经常变化;同时,政府政策规定对于每个区域都要间歇地进行保护,防止环境破坏。现在,滑雪项目的要求是给出每个n*n个点的初始高度,并给出m个命令,C a b c表示坐标为a,b的点的高度改为c;S a b c d表示左上角为a,b右下角为c,d的矩形地区开始进行保护,即不能继续滑雪;B a b c d表示左上角为a b,右下角为c d的矩形地区取消保护,即可以开始滑雪;Q表示询问现在该风景区可以滑雪的最长路径为多少。对于每个Q要作一次回答。
 
 花神一看,这不是超简单!立刻秒出了标算~
 

 

Input

第一行n,第二行开始n*n的地图,意义如上;接下来一个m,然后是m个命令,如上
 

 

Output

对于每一个Q输出单独一行的回答
 

Sample Input

5
1 2 3 4 5
10 9 8 7 6
11 12 13 14 15
20 19 18 17 16
21 22 23 24 25
5
C 1 1 3
Q
S 1 3 5 5
S 3 1 5 5
Q

Sample Output

24
3

样例解释:
第一个Q路线为:25->24->23->22….->3->2
第二个Q的路线为:10->9->2

HINT

 

100%的数据:1<=n<=700;1<=m<=1000000;其中Q、S、B操作总和<=100;

题中所有数据不超过2*10^9

 
题解
记忆化搜索……太裸了……DP也行
 1 /**************************************************************
 2     Problem: 3208
 3     User: 1090900715
 4     Language: Pascal
 5     Result: Accepted
 6     Time:16576 ms
 7     Memory:4544 kb
 8 ****************************************************************/
 9  
10 program j01;
11 var f,h:array[0..700,0..700]of longint;
12     bo:array[0..700,0..700]of boolean;
13     c:array[0..4,0..1]of longint;
14     n,m,i,j,a,b,c1,d,ans:longint;
15     ch:char;
16  
17 function max(a,b:Longint):longint;
18 begin
19   if a>b then exit(a) else exit(b);
20 end;
21  
22 function jud(x,y,x1,y1:longint):boolean;
23 begin
24   if (x1<=0)or(x1>n) then exit(false);
25   if (y1<=0)or(y1>n) then exit(false);
26   exit((h[x,y]>h[x1,y1])and bo[x1,y1]);
27 end;
28  
29 procedure dfs(i,j:longint);
30 var x:longint;
31 begin
32   if f[i,j]<>0 then exit;
33   f[i,j]:=1;
34   for x:=1 to 4 do
35     if jud(i,j,i+c[x,0],j+c[x,1]) then
36     begin
37       dfs(i+c[x,0],j+c[x,1]);
38       f[i,j]:=max(f[i,j],f[i+c[x,0],j+c[x,1]]+1);
39     end;
40   ans:=max(ans,f[i,j]);
41 end;
42  
43 begin
44   readln(n);
45   for i:=1 to n do
46     for j:=1 to n do
47       read(h[i,j]);
48   fillchar(bo,sizeof(bo),1);
49   c[1,0]:=0;c[1,1]:=1;
50   c[2,0]:=0;c[2,1]:=-1;
51   c[3,0]:=-1;c[3,1]:=0;
52   c[4,0]:=1;c[4,1]:=0;
53   readln(m);
54   while m>0 do
55   begin
56     dec(m);
57     read(ch);
58     while not(ch in[C,S,B,Q]) do read(ch);
59     if ch=C then
60     begin
61       readln(a,b,c1);
62       h[a,b]:=c1;
63     end;
64     if ch=S then
65     begin
66       readln(a,b,c1,d);
67       for i:=a to c1 do
68         for j:=b to d do
69           bo[i,j]:=false;
70     end;
71     if ch=B then
72     begin
73       readln(a,b,c1,d);
74       for i:=a to c1 do
75         for j:=b to d do
76           bo[i,j]:=true;
77     end;
78     if ch=Q then
79     begin
80       fillchar(f,sizeof(f),0);
81       ans:=0;
82       for i:=1 to n do
83         for j:=1 to n do
84           if (f[i,j]=0)and(bo[i,j]) then dfs(i,j);
85       writeln(ans);
86     end;
87   end;
88 end.

 

bzoj3208: 花神的秒题计划Ⅰ

标签:max   back   bbs   array   not   记忆化   begin   路径   code   

原文地址:http://www.cnblogs.com/oldjang/p/6189312.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!