28 条题解
-
-2asdcyt0258 LV 8 @ 2009-10-29 14:22:22
四楼诶
-
-22009-10-29 13:49:09@
...牛题膜拜
-
-32018-04-02 19:28:41@
水题呀!暴力*43ms*就可以AC!!!
-
-32010-03-03 19:07:12@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms -
-32009-11-04 20:10:24@
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms哇哈哈,最小表示
-
-32009-11-01 19:23:26@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
第10人!膜拜fjxmlhx神牛!
-
-32009-10-31 19:19:31@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 25ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:25mshash
函数没楼下这么烦
function hash(l,x:longint):int64;
var i:longint;
begin
hash:=3;f[x]:=false;
for i:=1 to s[l,x,0] do
if f[s[l,x,i]] then
hash:=(hash+hash(l,s[l,x,i])*473) mod 1000000073;
hash:=(hash*hash) mod 1000000073;
end;这么几行就够了
-
-32009-10-29 15:07:34@
占楼