注意三角形顶点坐标的奇偶性

program v1063;

var g:array[-1..102,-1..302]of longint;

i,j,k,n,ans:longint;

ch:char;

function min(a,b,c:longint):longint;

begin

min:=a;

if min>b then min:=b;

if min>c then min:=c;

end;

begin

readln(n);

for i:=1 to n do

for j:=1 to 2*(n-i)+1 do g:=1;

for i:=1 to n do begin

for j:=1 to i-1 do read(ch);

for j:=1 to 2*(n-i)+1 do begin

read(ch);

if ch='#' then g:=0;

end;

readln;

end;

ans:=0;

for i:=2 to n do

for j:=1 to 2*(n-i)+1 do if g>0 then begin

g:=min(g,g,g)+1;

if (g>ans)and odd(j) then ans:=g;

end;

writeln(sqr(ans));

end.

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

交的我快哭了...

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

for i:=1 to n shl 1-1 do

if a[1,i]='#' then f[1,i]:=0 else f[1,i]:=1;

for i:=2 to n do for j:=i to 2*n-i do if a='-' then

begin

f:=min(f,min(f,f))+1;

if(f>max)and((j-i)mod 2=0) then max:=f;

end;

writeln(max*max);

怎么回事情啊？？

记录号 Flag 得分 记录信息 环境 评测机 程序提交时间

R966437 Unaccepted 90 From 重反江湖－

　 P1063 FPC Vijos Dolphin 2008-10-27 19:18:27

From Tsuzuki

迎春舞会之集体舞 迎春舞会 系列

编译通过...

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

├ 测试数据 02：答案错误...　

| 标准行输出 1

　├ 错误行输出 4

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

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

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

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

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

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

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

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

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

\\\\\\\\\\\\\\\\\\

变量开这么大照过

var a:array[1..101,1..200]of 0..1; ch:char;

n,i,j,k,ans:integer; f:array[1..101,1..200]of integer;

n

输出的竟然是面积。。。没看见，WA了一次。。。

很简单的最大面积DP。。正倒算两边就是了。。。

贴一下程序?

部分动规代码

for (i=2;imax)max=dp[i][j];

}

}

}

感谢maddog大牛！

否则我怎么也过不了！

鄙视！鄙视！写数据范围的人~

久违了的一次AC!

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

我终于知道为什么如此简单的题AC率如此之低了...

注意细节，#2和#4过不了的，估计就是没注意细节.

前后前 后

前 后前后

才是正确的解

解题报告 http://plfxy.blog.hexun.com/23569466_d.html

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

|注意：！！！！！！！！！！！！！！！！！！！！！|

|1

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

深刻体会到"细节决定成败"这句话`\

少打个括号交了无数次`\

回想起了usaco里面的那道bigbarn......看来这类动规题目解题方法确实是万变不离其宗啊......

饿我只算了倒三角。。。和盖房子一样的DP啊

居然只算倒着的就AC了

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

感谢ZKKMJ

编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

没什么好说的。。

跟盖房子一样。

只不过多了写判断条件

呵呵，，太爽了这题！

呵呵·！

给点提示：

if (a=1) then

if (odd(i) and odd(j)) or (not odd(i) and not odd(j)) then

if f0 then

begin

f:=min(f,f)+1;

if (f>max) then max:=f;

我是用这个判断的

（PS：上面是正三角形）

if (a=1) then

if (not odd(i) and odd(j)) or (odd(i) and not odd(j)) then

if f0 then

begin

f:=min(f,f)+1;

if(f>max) then max:=f;

end;

（PS：上面是倒三角形）；

大家慢慢理解吧。。

我想了好久的特别是那 『if f0 then』

精华来的！

“请你求穿夏季校服的同学所构成的最大正三角形”为什么如此多的人求倒三角？