编译通过...

├ 测试数据 01：答案正确... 56ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 25ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：81ms

Qsort 加上 搜索 程序46行

先把所有高度快排，记下对应的行、列，然后从最小的高度开始枚举，此时为f[x,y]

f[x，y]:=max{f[x-1,y],f[x+1,y],f[x,y-1],f[x,y+1]}+1

注意要判断高度相同的情况，此时是不能下滑的。

├ 测试数据 01：答案正确... 9ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：9ms

交了两次= =‘

编译通过...

├ 测试数据 01：答案正确... 322ms

├ 测试数据 02：答案正确... 291ms

├ 测试数据 03：答案正确... 291ms

├ 测试数据 04：答案正确... 259ms

├ 测试数据 05：答案正确... 338ms

├ 测试数据 06：答案正确... 275ms

├ 测试数据 07：答案正确... 275ms

├ 测试数据 08：答案正确... 369ms

├ 测试数据 09：答案正确... 166ms

├ 测试数据 10：答案正确... 150ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：2736ms

传说中的暴力枚举...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 10：答案正确... 0ms

我的读入数组是integer型的，其他的变量都是longint

到了第九个数据就错了

然后我把读入数组改成longint的，就全对了

可是题中写明了读入的高度小于10000

可能是第九组数据读入数据大了

请大家小心啊

pku的程序一样抄上来——

编译通过...

├ 测试数据 01：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 02：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 03：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 08：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 09：运行时错误...| 错误号: 216 | 存取非法

├ 测试数据 10：答案错误...程序输出比正确答案长

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：20 有效耗时：0ms

啊！！！！！！！！！！！！

数组改成10000*10000。。

提交一次跳到首页去了。。

rp不对啊。，。

再提一次。。

编译通过...

├ 测试数据 01：答案正确... 72ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 56ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 41ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：169ms

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

不推荐递推

先进行快排，然后以此划分阶段

编译通过...

├ 测试数据 01：答案正确... 25ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：25ms

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：运行超时...

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：运行超时...

├ 测试数据 08：答案错误...　├ 标准行输出

　├ 错误行输出

├ 测试数据 09：运行超时...

├ 测试数据 10：运行超时...

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：50 有效耗时：0ms

把"for i2:=1 to n do"改成"for i2:=1 to m do"之后

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 9ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 416ms

├ 测试数据 10：答案正确... 25ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：450ms

啊呀呀 我的AC率啊

不过比较水的是 数据中有5个正方形 所以我才有50的

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

一开始被小光害了，那个方法会wa..

最后无奈还是编记忆化搜索

编译通过...

├ 测试数据 01：答案正确... 103ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 9ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：112ms

编译通过...

├ 测试数据 01：答案正确... 100ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：100ms

递推式动归

├ 测试数据 01：答案正确... 603ms

├ 测试数据 02：答案正确... 572ms

├ 测试数据 03：答案正确... 556ms

├ 测试数据 04：答案正确... 572ms

├ 测试数据 05：答案正确... 556ms

├ 测试数据 06：答案正确... 588ms

├ 测试数据 07：答案正确... 509ms

├ 测试数据 08：答案正确... 588ms

├ 测试数据 09：答案正确... 306ms

├ 测试数据 10：答案正确... 150ms

RP....

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

用DP（记忆化搜索）

f为该点开始的最长路径的长度

f:=max{f,f,f,f}+1 (相邻点比该点低)

强烈鄙视 Test 9 ，高度绝对超过范围，不用longint就是过不了……

这个...我就无语了,交了n次都是90分,把integer改成longint就ac了

编译通过...

├ 测试数据 01：答案正确... 56ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 41ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：97ms

哈哈··

记忆化搜索！

我终于懂了，，

研究了1个小时！

好兴奋！

编译通过...

├ 测试数据 01：答案正确... 1072ms

├ 测试数据 02：答案正确... 88ms

├ 测试数据 03：答案正确... 259ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 650ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 447ms

├ 测试数据 09：运行超时...

├ 测试数据 10：答案正确... 900ms

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：90 有效耗时：3416ms

var

s,fn,fx,a:array[1..99]of longint;

b:array[1..99]of boolean;

max,min,m,n,o,p,q:longint;

procedure zhao;

var i,j:longint;

begin

j:=s[1];

for i:=2to m do

if ja[p]

then if b[fx[p]]

then begin

inc(fx[o]);

b[fx[p]]:=false;

end;

fillchar(b,sizeof(b),true);

end;

for o:=m downto 1do

begin

for p:=m downto o do

if a[o]>a[p]

then if b[fn[p]]

then begin

inc(fn[o]);

b[fn[p]]:=false;

end;

fillchar(b,sizeof(b),true);

end;

for p:=1to m do

s[p]:=fx[p]+fn[p];

zhao;

end.

看看咋错了

什么叫穷举！！

编译通过...

├ 测试数据 01：答案正确... 999ms

├ 测试数据 02：答案正确... 999ms

├ 测试数据 03：答案正确... 999ms

├ 测试数据 04：答案正确... 999ms

├ 测试数据 05：答案正确... 999ms

├ 测试数据 06：答案正确... 999ms

├ 测试数据 07：答案正确... 999ms

├ 测试数据 08：答案正确... 999ms

├ 测试数据 09：答案正确... 999ms

├ 测试数据 10：答案正确... 999ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：9990ms

\\green

编译通过...

├ 测试数据 01：答案正确... 56ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 9ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 25ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 25ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：115ms

rqs+dp