92 条题解

  • 0
    @ 2008-11-05 15:34:14

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    ---|---|---|---|---|---|---|---|-

    Accepted 有效得分:100 有效耗时:0ms

  • 0
    @ 2008-11-05 15:10:46

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案错误... ├ 标准行输出

     ├ 错误行输出

    ├ 测试数据 06:答案错误... ├ 标准行输出

     ├ 错误行输出

    ├ 测试数据 07:答案错误... ├ 标准行输出

     ├ 错误行输出

    ├ 测试数据 08:答案错误... ├ 标准行输出

     ├ 错误行输出

    ├ 测试数据 09:答案错误... ├ 标准行输出

     ├ 错误行输出

    ├ 测试数据 10:答案错误... ├ 标准行输出

     ├ 错误行输出

    ---|---|---|---|---|---|---|---|-

    Unaccepted 有效得分:40 有效耗时:0ms

    var

    a,b,n:array[1..100]of longint;

    i,jin,j,k,x,y:integer;

    c:string;

    function pan:boolean;

    var iii:integer;

    begin

    if k>y then exit(true);

    if k=y then

    for iii:=k downto 1 do

    if a[iii]>n[iii] then exit(true);

    exit(false);

    end;

    begin

    read(c);

    x:=length(c)mod 5;

    y:=length(c)div 5;

    if x0 then

    val(copy(c,1,x),n[y+1]);

    for i:=1 to y do

    val(copy(c,(length(c)-x+2-i*5),5),n[i]);

    if y+10then y:=y+1;

    a[1]:=1;k:=1;i:=0;

    repeat

    b:=a;

    i:=i+1;

    for j:=1 to k do

    a[j]:=a[j]*2;

    for j:=1 to k do

    begin

    jin:=a[j]div 100000;

    a[j]:=a[j]mod 100000;

    a[j+1]:=a[j+1]+jin;

    end;

    if jin>0 then

    begin

    k:=k+1;

    a[k]:=jin;

    end;

    until pan;

    for i:=1 to y do

    begin

    jin:=n[i]-b[i];

    if jin>=0then a[i]:=jin

    else begin

    n:=n-1;

    a[i]:=jin+10;

    end;

    end;

    for i:=1 to y do

    a[i]:=a[i]*2;

    for i:=1 to y do

    a:=a+a[i]div 100000;

    if a[y+1]0 then y:=y+1;

    a[1]:=a[1]+1;

    write(a[y]);

    for i:=y-1 downto 1 do

    if a[i]=0 then write('00000')

    else if (a[i]div 10=0)then write('0000',a[i])

    else if (a[i]div 100=0)then write('000',a[i])

    else if (a[i]div 1000=0)then write('00',a[i])

    else if (a[i]div 10000=0)then write('0',a[i])

    else write(a[i]);

    end.

  • 0
    @ 2008-11-01 22:07:18

    压了4位。。。一开始总出错。。。

    总结哈子:当在一个数组里乘的时候,要最后进位。否则进的位也会乘进去。。。

    而高精度*高精度,乘在新数组里,可以直接进位。。。

  • 0
    @ 2008-10-29 16:41:31

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    ---|---|---|---|---|---|---|---|-

    Accepted 有效得分:100 有效耗时:0ms

    第 400 个AC

  • 0
    @ 2008-10-28 13:18:24

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    ---|---|---|---|---|---|---|---|-

    Accepted 有效得分:100 有效耗时:0ms

    2遍才AC!看来高精要练一练了(居然是输出出错,5555)

  • 0
    @ 2008-10-27 20:11:50

    规律简单。。但是2^j不会超时吗?

  • 0
    @ 2008-10-20 17:15:36

    AC~~~AC~~~

    不用担心细节~~数组开多大都没关系~~~

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    ---|---|---|---|---|---|---|---|-

    Accepted 有效得分:100 有效耗时:0ms

    全部秒杀!

    很麻烦的水题。只要有耐心,数组开够大就能过。规律很好找。

    先编个程序把1~255都列出来。

    ok.

  • 0
    @ 2008-10-19 22:17:55

    Oh,Yes,AC!

  • 0
    @ 2008-10-14 17:46:27

    同志们!要用高精度运算!否则会挂

  • 0
    @ 2008-10-13 23:07:54

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    ---|---|---|---|---|---|---|---|-

    Accepted 有效得分:100 有效耗时:0ms

  • 0
    @ 2008-10-05 11:06:38

    测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    高精+约瑟夫 真NX

  • 0
    @ 2008-09-29 23:29:25

    此题的一般性规律就在于:

    输入 n;

    n:=2^i+j(j

  • 0
    @ 2008-08-30 16:19:28

    60行有效代码

    WA了5次

    都是数据类型的问题

    改一点分高一点

    吸取教训

    第100题 留以纪念

  • 0
    @ 2008-08-28 23:34:01

    那个规律用二进制较容易证明。

  • 0
    @ 2008-08-16 16:34:10

    简单找规律……

  • 0
    @ 2008-07-30 21:03:43

    自己写了70分

    和别人AC的程序比了一下

    没什么区别

    郁闷中

  • 0
    @ 2008-07-24 17:30:38

    那谁能说说:

    1

    1 3

    1 3 5

    1 3 5 7

    1 3 5 7 9

    .

    .

    .

    .

    这个规律怎么实现?

  • 0
    @ 2007-11-22 00:45:37

    noip2007初赛问题求解第二题。。。

    又有可以刷的题了。。。

  • 0
    @ 2007-10-30 19:42:57

    编译通过...

    ├ 测试数据 01:答案正确... 0ms

    ├ 测试数据 02:答案正确... 0ms

    ├ 测试数据 03:答案正确... 0ms

    ├ 测试数据 04:答案正确... 0ms

    ├ 测试数据 05:答案正确... 0ms

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 0ms

    ├ 测试数据 08:答案正确... 0ms

    ├ 测试数据 09:答案正确... 0ms

    ├ 测试数据 10:答案正确... 0ms

    ---|---|---|---|---|---|---|---|-

    Accepted 有效得分:100 有效耗时:0ms

    第100题!!!!!虽然有些小意外,不过还是庆祝一下!!!!

    PS:这题的高精度好烦。

  • 0
    @ 2007-10-26 19:51:59

    此题的一般性规律就在于:

    输入 n;

    n:=2^i+j(j

信息

ID
1095
难度
6
分类
其他 | 数学 点击显示
标签
(无)
递交数
2356
已通过
662
通过率
28%
被复制
14
上传者