378 条题解
-
0
wk62 LV 3 @ 2007-10-19 15:21:27
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms
························
第998人！！！
wa了N次才全过！！！！！！注意两人打到11球时，相差要大于1！！！
-
0
smallapple LV 3 @ 2007-10-06 19:24:32
比赛场数好像都超过1万了,那两位兄弟真无敌……
-
0
zzhhbb1989 LV 3 @ 2007-09-29 17:56:53
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms
BT啊,第1个数据E -
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms -
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案错误... ├ 标准行输出
├ 错误行输出
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：90 有效耗时：0ms
我最后一组的输出是11：0 结果行是0：0
是哪里错了？ -
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms -
0
LV 0 @ 2007-08-15 10:13:46
题怎么不说清楚。数组要开到60000，分差大于1才算结束。
-
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：运行时错误...|错误号: -1073741819
├ 测试数据 07：运行时错误...|错误号: -1073741819
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：80 有效耗时：0ms
var
l:integer;
ch:array[1..10000]of char;
procedure try(t:integer);
var
x,y,i:integer;
begin
x:=0;
y:=0;
for i:=1 to l do
if ch[i]='W' then begin
inc(x);
if (x>=t)and(x-y>=2) then begin
writeln(x,':',y);
x:=0;
y:=0;
end
end
else begin
inc(y);
if (y>=t)and(y-x>=2) then begin
writeln(x,':',y);
x:=0;
y:=0;
end;
end;
writeln(x,':',y);
end;
begin
l:=0;
repeat
inc(l);
read(ch[l]);
if l mod 20=0 then readln;
until ch[l]='E';
dec(l);
try(11);
writeln;
try(21);
end.各位大牛帮忙看看啊!一直不晓得哪儿错了
wk62
LV 3
@ 2007-10-19 15:21:27
