91 条题解
-
0cnnblike LV 9 @ 2009-04-15 11:56:11
果然是难度为0的题目,我还以为会超时的程序居然都是0ms过掉……这个……随便写个直接编译通过……然后直接过样例……然后直接AC……很久没这么干脆了……
-
02009-03-26 18:49:00@
强大的 枚举
-
02009-03-08 13:09:40@
枚举妙杀.....
谁能用贪心写啊,我老是贪不了10个点 -
02009-02-25 18:25:54@
#include
int main(void) {
char s[11],*p1,*p2,*p3,*p4,dest,*end;
int n,i;
scanf("%d\n",&n);
for(i=0;i -
02009-01-14 23:57:37@
不知是这题太阴还是我C++学的太浅
我的判断函数是对的
但WA的6次全因为字符串输入的问题
怀念pascal的string...... -
02009-01-14 20:30:13@
居然有空格!!!
歧视C++,5555~~~~~
恨死空格和回车了 -
02008-12-20 08:52:44@
看来的确有不少人倒在了"de1ete"上~~~~
其实就是枚举而已嘛~~ -
02008-12-11 13:26:20@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0msprogram p1482;
var
n,time:longint;procedure InitInfo;
begin
readln(n);
end;procedure Online;
var
i,x1,x2,x3,x4,l:longint;
st:string;
begin
readln(st);
l:=length(st);
for x1:=1 to l-3 do
for x2:=x1+1 to l-2 do
for x3:=x2+1 to l-1 do
for x4:=x3+1 to l do
if ((st[x1]=st[x2]) and (st[x3]=st[x4])) or
((st[x1]=st[x4]) and (st[x2]=st[x3])) then
begin
writeln('de1ete');
exit;
end;
writeln('safe');
end;begin
InitInfo;
randomize;
for time:=1 to n do Online;
end. -
02008-11-29 10:01:04@
秒杀!!!!
注意是输出"de1(数字)ete"而不是"del(字母)ete" -
02008-11-28 20:23:59@
de1ete..........
没见过这么无趣的。。。。。。。。。。
怪不得这囧题AC率那么低 -
02008-11-25 19:37:29@
编译通过...
├ 测试数据 01:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 02:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 03:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 04:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 05:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 06:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 07:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 08:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 09:答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 10:答案错误... ├ 标准行输出
├ 错误行输出
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分:0 有效耗时:0ms
什么情况,样例都好好的啊 -
02008-11-22 15:29:21@
其实这个题目并不用考虑字符串中有空格的影响
普通读入字符串然后处理就能AC`\
7次啊 AC率暴减 -
02008-11-21 21:24:59@
注意:循环的初始条件和终结条件!!!
我就是在这里错了. -
02008-11-19 09:12:28@
de1ete!!!!!
果然Baby!
readln(st);t:=0;len:=length(st);
for i:=1 to len-3 do
for j:=i+1 to len-2 do
for k:=j+1 to len-1 do
for l:=k+1 to len do
if ((st[i]=st[j])and(st[k]=st[l]))or((st[i]=st[l])and(st[k]=st[j])) then
begin t:=1;end;
if t=0 then writeln('safe') else writeln('delete');0ms....
-
02008-11-14 00:17:09@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
Puppy就是爽 -
02008-11-13 21:57:14@
强烈鄙视评测机!!!
最后一个点超时的人,建议多交几次……
-
02008-11-13 21:49:08@
这个世界对我太不公平了....
n年才用一次的goto语句....
竟然编译不过....
自己的机上测的好好的哩...
还是不用goto好... -
02008-11-13 21:36:16@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:运行超时...
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分:90 有效耗时:0ms
为什么最后一点超时? -
02008-11-13 21:36:15@
第一遍交,de”l“ete 0分
第二遍交,de”1"ete 90分
最后一点超时。对dragon无语。亏我写的还是n^3,1000000也能超时…… -
02008-11-13 20:58:50@
这题的delete打错了也就算了,连测试数据都搞这种
无语中......