78 条题解
-
0cgy4ever LV 10 @ 2008-08-30 17:01:13
昨天好不容易想到了比较好的方法
居然因为输入的问题才得10分……
ps:我USACO才做完第一章,英文实在太xx了…… -
02008-08-30 14:04:22@
大家的算法是什么?为什么我用ANSISTRING会内存溢出7个点呢?
-
02008-09-05 13:28:11@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 72ms
├ 测试数据 05:答案正确... 541ms
├ 测试数据 06:答案正确... 869ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 572ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:2054ms判断时判断下最小的头字母是否=上一个,=的话就不要判断了,因为都是一样大的话第一个是最优解如:aaaaalaa
要取第一个a一样。第2345都不用找了一样。 -
02008-08-30 12:13:37@
这是怎么回事啊
编译通过...
测试数据01:运行时错误...|错误号: -1073741819
测试数据02:运行时错误...|错误号: -1073741819
测试数据03:运行时错误...|错误号: -1073741819
测试数据04:运行时错误...|错误号: -1073741819
测试数据05:运行时错误...|错误号: -1073741819
测试数据06:运行时错误...|错误号: -1073741819
测试数据07:运行时错误...|错误号: -1073741819
测试数据08:运行时错误...|错误号: -1073741819
测试数据09:答案正确... 0ms
测试数据10:运行时错误...|错误号: -1073741819
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分:10 有效耗时:0ms -
02008-08-30 11:53:49@
汗……我说怎么10分,原来是读入的问题!!!
数据是换行的!!!bs出题人……本来就是原题还搞不好……
for i:=1 to n do read(s[i])---|>XXXXX
while not eof do begin
while not eoln do begin
inc(i);read(s[i]);
end;
readln;
end;
AC…… -
02008-08-30 11:19:00@
读入真害人,
一开始
readln(s);
10分;
改为
while not eof do
begin
readln(t);
s:=s+t;
end;
就AC了
要注意啊。 -
02008-08-30 10:57:20@
其实USACO原题的输入是72个字母换行
所以读入只要:
for i:=1 to len do
begin
read(s[i]);
if i mod 72=0 then readln;
end; -
02008-08-30 10:15:49@
读入的问题
直接用min存最小字串,P存其首字符位置,从头到尾扫一遍。
若存在相同最小字串,取P最小的 -
02008-08-30 09:58:59@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms层层筛选
-
02008-08-30 09:22:55@
小心数据!
按字符个数读!
不要整行读!
被题目整了。。晕。。 -
02008-08-30 09:20:39@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 1853ms
├ 测试数据 05:答案正确... 1759ms
├ 测试数据 06:答案正确... 1900ms
├ 测试数据 07:答案正确... 4666ms
├ 测试数据 08:答案正确... 228ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 494ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:10900ms
庆祝一下成为此题的第八个通过者..
提醒一下后来做的大牛们:
题目误导人,字符串是有多行给出的,不是只有一行的.. -
02008-08-30 07:40:18@
MD怎么搞的90分
-
02008-08-30 11:50:54@
改个读入,多对7个点。。。。。。。。。。。。。。。。。。。。。题目描述肯定是有问题的
这道题可以用一个极其巧妙的二分法..我也是看题解才想到的
-
02008-08-30 10:27:51@
要求出题人解释!!
readln(l);
for i:=0 to l-1 do read(a[i].letter);
___|\__|\__|\__|\__|\__|\__|\__|\__|\__|_readln(l);
repeat
read(ch);
if (ch>='a') and (ch -
02008-08-30 07:05:04@
Hidden password
-
02008-08-30 01:23:38@
怎么回事不可能啊,要求重测
程序如下:
var
s:array[0..100000] of char;
a:array[0..100000] of longint;
ch:char;
i,k,l:longint;
function fc(a,b:longint):boolean;
var
i,j,k:longint;
begin
fc:=false;
i:=a;
j:=b;
for k:=1 to l-1 do
begin
inc(i);
i:=i mod l;
inc(j);
j:=j mod l;
if s[i]s[j] then exit(true);
end;
end;
begin
readln(l);
ch:='~';
fillchar(a,sizeof(a),0);
for i:=0 to l-1 do
begin
read(s[i]);
if s[i] -
02008-08-31 14:21:20@
字符串分行读入,O(n^2)可过
-
02008-08-30 00:32:39@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 1775ms
├ 测试数据 05:答案正确... 1931ms
├ 测试数据 06:答案正确... 1838ms
├ 测试数据 07:答案正确... 4556ms
├ 测试数据 08:答案正确... 212ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 447ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:10759ms(汗死~~~这个时间够我跳楼的了...)
上帝保佑,第7个点卡时通过...注意!!!!!这个字符串并不是在一行里给出的...被坑了n次才发现...