题解

109 条题解

  • 0
    @ 2009-10-23 21:11:13

    = =果然是水。。

  • 0
    @ 2009-10-13 19:49:09

    水题一道

    终于AC了~~~

  • 0
    @ 2009-10-13 14:28:29

    此题真乃NOIp之败笔!

  • 0
    @ 2009-10-05 18:58:46

    第2222个AC的耶!~~~

    Flag   Accepted

    题号   P1125

    类型(?)   其它

    通过   2222人

    提交   5380次

    通过率   41%

    难度   1

    • @ 2013-12-16 21:47:46

      。。。无语了。这么不吉利的数字 。。。同情,迟点交不行啊( ⊙ o ⊙ )。。。

  • 0
    @ 2009-09-04 00:11:00

    我非常无语地一次AC.

  • 0
    @ 2009-09-01 14:24:39

    和k友什么关系啊

  • 0
    @ 2009-08-28 02:19:00

    现在用double也能过呀

  • 0
    @ 2009-08-26 16:29:55

    一开始把g打成9.8,查到半死……

    所以说有时候精确也不一定是一件好事……

  • 0
    @ 2009-08-20 15:25:59

    var

    n,g,s1,s2,s0,i:longint;

    h,s,v,l,k,t00,t01,t1,t2,d1,d2:real;

    begin

    readln(h,s,v,l,k,n);

    g:=10;

    s0:=0;

    t00:=sqrt(2*h/g);

    t01:=sqrt(2*(h-k)/g);

    s1:=trunc(s-t00*v);

    s2:=trunc(s-t01*v+l);

    if s1

  • 0
    @ 2009-08-15 12:02:33

    编译通过...

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

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

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

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

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

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

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

    Program ex1;

    var

    h,s1,t1,t2,head,tail,v,l,k,t,d:real;

    i,j,n,total:longint;

    begin

    readln(h,s1,v,l,k,n);

    d:=h-k;

    t1:=sqrt(d/5);

    t2:=sqrt(h/5);

    t1:=t1*v;

    t2:=t2*v;

    head:=s1-t2;

    tail:=s1-t1+l;

    for i:=0 to n-1 do

    if (i>=head-0.0001) and (i

  • 0
    @ 2009-08-14 09:07:55

    鄙视这道cuo题

  • 0
    @ 2009-08-12 15:34:28

    var

    sum,n,i:longint;

    left,right,t1,t2,h,s1,v,l,k:real;

    const

    e=0.00001;

    g=10;

    begin

    read(h,s1,v,l,k,n);

    t1:=sqrt(2*h/g);

    if h-k-e=left) and (i

  • 0
    @ 2009-08-12 12:03:04

    为什么只能用float不能用double 呢?

  • 0
    @ 2009-08-11 23:25:09

    看到个抽象图

    * *  * * * * * * * * * *球 

    ----------------------------

      1

     H 1

    高 1 L

      1             K @@@@@ 小车

      1   s1          @111@  

    ----------------------------

  • 0
    @ 2009-08-09 09:11:27

    var

    n,i,ans:integer;

    s1,h,v,l,k,t1,t2,left,right:real;

    begin

    readln(h,s1,v,l,k,n);

    t1:=sqrt((h)/5);

    t2:=sqrt((h-k+0.00001)/5);

    left:=s1-v*t1;

    right:=s1+l-v*t2;

    for i:=0 to n-1 do

    if (i>=left-0.00001)and(i

  • 0
    @ 2009-08-07 11:17:16

    不该不注意前面N多人说的话

    不能用double 而是用float ..

    我的AC率就这样掉了

  • 0
    @ 2009-08-05 15:27:28

    杨斌同学的方法通过计算在小车运动轨迹中小球的个数,既简化了程序,又囊括了所有情况。OrZ 一下。

  • 0
    @ 2009-08-05 15:10:49

    杨斌同学的方法很好,计算区域比分情况方便多了。

  • 0
    @ 2009-08-05 09:54:17

    #include

    #include

    using namespace std;

    int main()

    {

    float h,s,v,l,k,n,tmax,tmin,s1,s2,m;

    cin>>h>>s>>v>>l>>k>>n;

    m=0;

    tmax=sqrt(2*h/10);

    tmin=sqrt(2*(h-k)/10);

    s2=s-tmin*v+l;

    s1=s-tmax*v;

    for(int i=0;i=s1-0.00001&&i

  • 0
    @ 2009-08-04 15:44:19

    const

    e=0.00001;

    g=10;

    var

    n:longint;

    left,right,min,max,l,h,s,v,k:real;

    begin

    readln(h,s,v,l,k,n);

    min:=sqrt((h-k)/g*2);{算能接住的最小值}

    max:=sqrt(h/g*2);{算能接住的最大值}

    left:=s-v*max;

    right:=trunc(s+l-v*min+e);

    if left-e=trunc(left-e) then{是整数就剪去}

    left:=trunc(left-e)

    else

    left:=trunc(left-e)+1;{不然就进1}

    if leftn-1 then right:=n-1;

    if left>right then{看看有没有区间}

    writeln(0)

    else

    writeln(right-left+1:0:0);{算能接住多少个球}

    end.

信息

ID
1125
难度
4
分类
模拟 点击显示
标签
递交数
3450
已通过
1428
通过率
41%
被复制
10
上传者