/ Vijos / 题库 / 采药 /

题解

303 条题解

  • 0
    @ 2008-08-27 12:15:47

    哪位大牛能解释一下,为什么这题状态转移时,正着0分,倒着就AC?

    很苦恼~~

  • 0
    @ 2008-08-26 20:23:37

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

    var i,j,k,l,m,n:integer;

    a,b:array[0..100] of integer;

    c:array[0..1000,0..1000] of longint;

    function max(x,y:integer):integer;

    begin

    if x>y then max:=x else max:=y;

    end;

    begin

    readln(m,n);

    for i:=1 to n do

    readln(a[i],b[i]);

    fillchar(c,sizeof(c),0);

    for i:=1 to n do

    begin

    for j:=m downto 1 do

    begin

    if j>=a[i] then

    c:=max(c,c+b[i])

    else

    c:=c;

    end;

    end;

    writeln(c[n,m]);

    end.

    背包就背包 还采药 快倒了~

  • 0
    @ 2008-08-23 11:27:46

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

    为什么??

    if f[i-tt[j],j-1]+cc[j]>f f

  • 0
    @ 2008-08-22 20:19:49

    var

    t,m,cost,ti,co:integer;

    f:array[0..100]of integer;

    a:array[0..100,1..2]of integer;

    function max(a,b:longint):longint;

    begin

    if a>b then

    max:=a

    else max:=b;

    end;

    procedure print;

    var

    i:longint;

    begin

    readln(t,m);

    for i:=1 to m do

    readln(a,a);

    fillchar(f,sizeof(f),0);

    end;

    procedure init;

    var

    i,j,k,l:integer;

    begin

    k:=0;

    for i:=1 to m do

    for j:=t downto 1 do

    begin

    if j-a>=0 then

    f[j]:=max(f[j-a]+a,f[j]);

    if f[j]>k then

    k:=f[j]

    end;

    write(k);

    end;

    begin

    print;

    init

    end.

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

    想当年我也没做出来啊……

  • 0
    @ 2008-07-27 09:46:40

    谁能写个解题报告

  • 0
    @ 2008-07-26 19:47:25

    34ti:yi xing ban le

  • 0
    @ 2007-11-15 16:54:04

    Flag   

    题号   P1104

    类型(?)   动态规划

    通过   3023人

    提交   6999次

    通过率   43%

    难度   2

    为第6999次而做!....

    Flag   Accepted

    题号   P1104

    类型(?)   动态规划

    通过   3024人

    提交   7000次

    通过率   43%

    难度   2

  • 0
    @ 2007-11-15 15:31:06

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

  • 0
    @ 2007-11-13 23:12:32

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

    直接网页编写一遍AC,庆祝一下!!

  • 0
    @ 2007-11-12 19:15:48

    简单的背包

  • 0
    @ 2007-11-10 14:58:11

    无敌无聊的题目...背包...

    直接就one world one dream one AC

  • 0
    @ 2007-10-26 20:57:42

    弱弱的动归

  • 0
    @ 2007-10-06 21:56:52

    不能将循环颠倒的原因是会重复

    ps. 看见有人问就回答一下,其实这个问题也困扰我很久

  • 0
    @ 2007-10-01 17:06:02

    那个叫滚搜来的

  • 0
    @ 2007-09-30 22:41:38

    编译通过...

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

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

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

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

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

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

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

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

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

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

  • 0
    @ 2007-09-19 23:40:49

    没想想到这里有这么多人哈~~~~

  • 0
    @ 2007-09-15 20:06:16

    如果回溯的话,加一个小剪枝也只能过3组数据(72行,纯属尝试,本未打算过),说明这道题比后面的NASA发火箭的题数据强得多。

    基本的01背包的dp。20行。

  • 0
    @ 2007-09-08 21:51:24

    就是0-1背包,跟1025小飞侠游园一样,不过输入格式不同,导致我提交了3次。。。。。。。。

  • 0
    @ 2007-08-23 21:07:33

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

信息

ID
1104
难度
4
分类
动态规划 | 背包 点击显示
标签
递交数
16859
已通过
6541
通过率
39%
被复制
39
上传者