140 条题解
-
-1jsjcw_123 LV 10 @ 2009-08-13 16:33:49
枚举秒杀。。。。
-
-12009-08-06 17:44:58@
A
A A
A A
A A
A A
A A
AAAAAAAAAA
A A
A A
A ACCCC
C C
C
C
C
C
C
C
C C
CCCCCC
35/100 真难看啊 嘻嘻 -
-12009-08-04 19:44:41@
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 56ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 25ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 41ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 41ms
发现xj-xi大于min了直接剪纸。。不过这样的ms只能说机器太好,数据太水 -
-12009-08-03 01:04:32@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
不会分治,枚举~~~~~ -
-12009-07-24 23:57:51@
我无语...把纵坐标排序后...在枚举判断跳出时用横坐标...竟然都有80...浪费我AC率啊...
-
-12009-07-21 16:19:25@
我无语。。。写好了qsort没加到主程序里。。。结果我的正确率足足下降了10%多。。。。发现后。。0ms AC
-
-12009-07-20 09:55:32@
怒了!!!!!!!!!!!!!!!!!!!!!!!
把quicksort里判断跳出的条件(t=h)
结果WA了八次!!!补充一句:数据很弱小,puppy很强大
-
-12009-07-19 18:53:25@
编译通过...
├ 测试数据 01:答案正确... -100ms
├ 测试数据 02:答案正确... -100ms
├ 测试数据 03:答案正确... -100ms
├ 测试数据 04:答案正确... -100ms
├ 测试数据 05:答案正确... -100ms
├ 测试数据 06:答案正确... -100ms
├ 测试数据 07:答案正确... -100ms
├ 测试数据 08:答案正确... -100ms
├ 测试数据 09:答案正确... -100ms
├ 测试数据 10:答案正确... -100ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:+无穷 有效耗时:-1000ms诡异啊
-
-12009-07-09 16:29:34@
哪位大牛帮我看一看,我不知道为什么会这样,谢了!!!
编译通过...
├ 测试数据 01:运行时错误...| 错误号: 216 | 存取非法
├ 测试数据 02:运行时错误...| 错误号: 207 | 无效浮点运算
├ 测试数据 03:运行时错误...| 错误号: 216 | 存取非法
├ 测试数据 04:运行时错误...| 错误号: 207 | 无效浮点运算
├ 测试数据 05:运行时错误...| 错误号: 207 | 无效浮点运算
├ 测试数据 06:运行时错误...| 错误号: 207 | 无效浮点运算
├ 测试数据 07:运行时错误...| 错误号: 207 | 无效浮点运算
├ 测试数据 08:运行时错误...| 错误号: 216 | 存取非法
├ 测试数据 09:运行时错误...| 错误号: 207 | 无效浮点运算
├ 测试数据 10:运行时错误...| 错误号: 207 | 无效浮点运算
program P1012;
var
n,i,j :longint;
t1,t2,min :real;
x,y :array[1..100000]of longint;
procedure sort(left,right:longint);
var
i,j,mid,a,b,tmp :longint;
begin
i:=left; j:=right; mid:=(i+j) div 2;
a:=x[mid]; b:=y[mid];
while i -
-12009-06-02 20:47:44@
血的教训啊!提交前一定要在IDE中调试!直接打代码害我CE了3次
-
-12009-06-01 07:37:43@
编译通过...
├ 测试数据 01:答案正确... 9ms
├ 测试数据 02:答案正确... 56ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 9ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 9ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 41ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:124ms朴素。
-
-12009-05-24 13:10:44@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
快排+枚举(剪枝)var x,y:array[0..100010]of double;
n:longint;
procedure init;
var i:longint;
begin
readln(n);
for i:=1 to n do
readln(x[i],y[i]);
end;
procedure kp(st,ed:longint);
var i,j:longint;
q,t:double;
begin
i:=st;
j:=ed;
q:=x[(i+j)div 2];
repeat
while x[i]q do dec(j);
if ij;
if st -
-12008-12-22 17:12:59@
编译通过...
├ 测试数据 01:答案正确... 9ms
├ 测试数据 02:答案正确... 56ms
├ 测试数据 03:答案正确... 9ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 9ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 25ms
├ 测试数据 08:答案正确... 56ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 56ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:220ms
fjxmlhx牛 ORZ
快排+剪枝也很快 -
-12008-10-22 15:48:35@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 9ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 9ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:18ms -
-12008-10-20 20:10:21@
编译通过...
├ 测试数据 01:答案正确... -1ms
├ 测试数据 02:答案正确... -1ms
├ 测试数据 03:答案正确... -1ms
├ 测试数据 04:答案正确... -1ms
├ 测试数据 05:答案正确... -1ms
├ 测试数据 06:答案正确... -1ms
├ 测试数据 07:答案正确... -1ms
├ 测试数据 08:答案正确... -1ms
├ 测试数据 09:答案正确... -1ms
├ 测试数据 10:答案正确... -1ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100000000 有效耗时:-10ms
靠 真邪门!!!!!! -
-12008-10-10 05:59:42@
编译通过...
├ 测试数据 01:答案正确... 9ms
├ 测试数据 02:答案正确... 56ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 56ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 41ms
├ 测试数据 08:答案正确... 88ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 119ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:369ms没话说了,枚举+快排效率竟然那么高……
-
-12008-10-10 00:46:04@
编译通过...
├ 测试数据 01:答案正确... 25ms
├ 测试数据 02:答案正确... 884ms
├ 测试数据 03:答案正确... 9ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 88ms
├ 测试数据 06:答案正确... 25ms
├ 测试数据 07:答案正确... 103ms
├ 测试数据 08:答案正确... 88ms
├ 测试数据 09:答案正确... 103ms
├ 测试数据 10:答案正确... 150ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:1475ms太疯狂了!提交了n多次,总是不对,最后发现原来是把long long写成了int!
晕死! -
-12008-10-08 13:17:26@
编译通过...
├ 测试数据 01:答案正确... 1478ms
├ 测试数据 02:答案正确... 2119ms
├ 测试数据 03:答案正确... 1212ms
├ 测试数据 04:答案正确... 166ms
├ 测试数据 05:答案正确... 1728ms
├ 测试数据 06:答案正确... 931ms
├ 测试数据 07:答案正确... 1681ms
├ 测试数据 08:答案正确... 1884ms
├ 测试数据 09:答案正确... 806ms
├ 测试数据 10:答案正确... 2088ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:14093ms好慢。。。
-
-12008-09-29 09:07:56@
编译通过...
├ 测试数据 01:答案正确... 275ms
├ 测试数据 02:答案正确... 353ms
├ 测试数据 03:答案正确... 150ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 322ms
├ 测试数据 06:答案正确... 119ms
├ 测试数据 07:答案正确... 291ms
├ 测试数据 08:答案正确... 275ms
├ 测试数据 09:答案正确... 25ms
├ 测试数据 10:答案正确... 275ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:2085ms交了三便 终于过了啊
用分治法处理 按x坐标取中间点 而后……(自己想啦)
注意啊 在处理sqr(x1-x2)的时候 如果定义的是longint 是会越界的 应改为sqr(extended(x1-x2)) 才能过啊 -
-22009-09-18 17:16:19@
编译通过...
├ 测试数据 01:答案正确... 25ms
├ 测试数据 02:答案正确... 25ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 25ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 9ms
├ 测试数据 08:答案正确... 25ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 41msint 0分, long long 100分。