题解

245 条题解

  • 0
    @ 2012-08-02 15:02:09

    编译通过...

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

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

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

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

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

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

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

    点击查看代码

  • 0
    @ 2012-07-21 13:06:43

    先手工模拟一下(7,3),(8,3),(9,3)这三组数据然后就会发现一些端倪。。

    以k=3为例。。假设分成的三个数为a,b,c。。则有1

  • 0
    @ 2010-04-13 11:08:03

    编译通过...

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

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

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

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

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

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

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

    #include

    int tot,n,k;

    void tryy(int i,int last,int n)

    {

    if(i==k){tot++;return;}

    for(int j=last;j

  • 0
    @ 2010-04-11 21:03:13

    删掉这道题的“任意两份不能相同”

  • 0
    @ 2010-04-05 16:39:26

    #include

    using namespace std;

    const int Maxk=10;

    int a[Maxk];

    int n,k,tot;

    void sum(int kx)

    {

    int i,j,m;

    if (kx==k)

    {

    tot++;

    return;

    }

    m=a[kx];

    for (i=a[kx-1];i>n>>k;

    tot=0;

    int i;

    for (i=1;i

  • 0
    @ 2010-03-29 18:26:35

    额,题虽然有点难,但是至于打表吗???

    var f:array[0..201,0..7]of longint;

    i,j,p,n,k:integer;

    begin

    readln(n,k);

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

    f[0,0]:=1;

    for p:=1 to n do

    for i:=p to n do

    for j:=k downto 1 do

    inc(f,f);

    writeln(f[n,k]);

    end.

  • 0
    @ 2009-11-11 18:30:06

    那位牛人讲讲这样做的原理!

    如下:

    #include "stdio.h"

    int f(int n,int k)

    {

    if(k==1)

    return 1;

    if(n

    • @ 2014-01-25 19:51:14

      这是应该是递推

  • 0
    @ 2009-11-08 21:11:30

    我用深搜。。。。。。。。第5组超时!!!!!!!!!!!!!!!!!!!!!!!!!!

  • 0
    @ 2009-11-07 11:03:13

    program 1117;

    var array [1..500] of longint;

    n,k,sum:longint;

    procedure init;

    begin

    read(n,k);

    end;

    procedure dfs(i:longint);

    var j:longint;

    begin

    if i>k then begin if sum=n then inc(ans);end;

    else for j:=a+1 to n-sum do

    begin

    inc(sum,j);

    a[i]:=j;

    dfs(i+1);

    dec(sum,j);

    end;

    end;

    end;

    begin

    init;

    dfs(1);

    writeln(ans);

    end.

    为什么我的深搜超时 怎么剪枝啊!

  • 0
    @ 2009-11-06 16:12:04

    打表之人好牛B

  • 0
    @ 2009-11-06 13:29:36

    本题其实应该是DP的`\
    记得老师要我们做这道题的时候我硬是用半个小时把公式套出来了
    (就是找规律,看灵感)
    但是,如果数论(且手感,我手感好^^)不好\
    \(比如我)
    用背包是可以的\
    ``\`

    for i:=1 to n do

    for j:=i to n do

    for r:=1 to k do

    f[j,r]:=f[j-i,r-1]+f[j,r];

    其中I表示当前用什么数背,J表示用I背出的总数,R表示用了几份

    输出F(N,K)就是最终的解

  • 0
    @ 2009-11-04 09:48:46

    专业打表!!!!!!!!!!!!!!

    var

    f:array[6..200,2..6]of longint;

    n,k:longint;

    begin

    f[6,2]:=3;f[7,2]:=3;f[8,2]:=4;f[9,2]:=4;f[10,2]:=5;f[11,2]:=5;f[12,2]:=6;f[13,2]:=6;f[14,2]:=7;f[15,2]:=7;f[16,2]:=8;f[17,2]:=8;f[18,2]:=9;f[19,2]:=9;f[20,2]:=10;f[21,2]:=10;f[22,2]:=11;f[23,2]:=11;f[24,2]:=12;f[25,2]:=12;f[26,2]:=13;f[27,2]:=13;f[28,2]:=14;f[29,2]:=14;f[30,2]:=15;f[31,2]:=15;f[32,2]:=16;f[33,2]:=16;f[34,2]:=17;f[35,2]:=17;f[36,2]:=18;f[37,2]:=18;f[38,2]:=19;f[39,2]:=19;f[40,2]:=20;f[41,2]:=20;f[42,2]:=21;f[43,2]:=21;f[44,2]:=22;f[45,2]:=22;f[46,2]:=23;f[47,2]:=23;f[48,2]:=24;f[49,2]:=24;f[50,2]:=25;f[51,2]:=25;f[52,2]:=26;f[53,2]:=26;f[54,2]:=27;f[55,2]:=27;f[56,2]:=28;f[57,2]:=28;f[58,2]:=29;f[59,2]:=29;f[60,2]:=30;f[61,2]:=30;f[62,2]:=31;f[63,2]:=31;f[64,2]:=32;f[65,2]:=32;f[66,2]:=33;f[67,2]:=33;f[68,2]:=34;f[69,2]:=34;f[70,2]:=35;f[71,2]:=35;f[72,2]:=36;f[73,2]:=36;f[74,2]:=37;f[75,2]:=37;f[76,2]:=38;f[77,2]:=38;f[78,2]:=39;f[79,2]:=39;f[80,2]:=40;f[81,2]:=40;f[82,2]:=41;f[83,2]:=41;f[84,2]:=42;f[85,2]:=42;f[86,2]:=43;f[87,2]:=43;f[88,2]:=44;f[89,2]:=44;f[90,2]:=45;f[91,2]:=45;f[92,2]:=46;f[93,2]:=46;f[94,2]:=47;f[95,2]:=47;f[96,2]:=48;f[97,2]:=48;f[98,2]:=49;f[99,2]:=49;f[100,2]:=50;f[101,2]:=50;f[102,2]:=51;f[103,2]:=51;f[104,2]:=52;f[105,2]:=52;f[106,2]:=53;f[107,2]:=53;f[108,2]:=54;f[109,2]:=54;f[110,2]:=55;f[111,2]:=55;f[112,2]:=56;f[113,2]:=56;f[114,2]:=57;f[115,2]:=57;f[116,2]:=58;f[117,2]:=58;f[118,2]:=59;f[119,2]:=59;f[120,2]:=60;f[121,2]:=60;f[122,2]:=61;f[123,2]:=61;f[124,2]:=62;f[125,2]:=62;f[126,2]:=63;f[127,2]:=63;f[128,2]:=64;f[129,2]:=64;f[130,2]:=65;f[131,2]:=65;f[132,2]:=66;f[133,2]:=66;f[134,2]:=67;f[135,2]:=67;f[136,2]:=68;f[137,2]:=68;f[138,2]:=69;f[139,2]:=69;f[140,2]:=70;f[141,2]:=70;f[142,2]:=71;f[143,2]:=71;f[144,2]:=72;f[145,2]:=72;f[146,2]:=73;f[147,2]:=73;f[148,2]:=74;f[149,2]:=74;f[150,2]:=75;f[151,2]:=75;f[152,2]:=76;f[153,2]:=76;f[154,2]:=77;f[155,2]:=77;f[156,2]:=78;f[157,2]:=78;f[158,2]:=79;f[159,2]:=79;f[160,2]:=80;f[161,2]:=80;f[162,2]:=81;f[163,2]:=81;f[164,2]:=82;f[165,2]:=82;f[166,2]:=83;f[167,2]:=83;f[168,2]:=84;f[169,2]:=84;f[170,2]:=85;f[171,2]:=85;f[172,2]:=86;f[173,2]:=86;f[174,2]:=87;f[175,2]:=87;f[176,2]:=88;f[177,2]:=88;f[178,2]:=89;f[179,2]:=89;f[180,2]:=90;f[181,2]:=90;f[182,2]:=91;f[183,2]:=91;f[184,2]:=92;f[185,2]:=92;f[186,2]:=93;f[187,2]:=93;f[188,2]:=94;f[189,2]:=94;f[190,2]:=95;f[191,2]:=95;f[192,2]:=96;f[193,2]:=96;f[194,2]:=97;f[195,2]:=97;f[196,2]:=98;f[197,2]:=98;f[198,2]:=99;f[199,2]:=99;f[200,2]:=100;f[6,3]:=3;f[7,3]:=4;f[8,3]:=5;f[9,3]:=7;f[10,3]:=8;f[11,3]:=10;f[12,3]:=12;f[13,3]:=14;f[14,3]:=16;f[15,3]:=19;f[16,3]:=21;f[17,3]:=24;f[18,3]:=27;f[19,3]:=30;f[20,3]:=33;f[21,3]:=37;f[22,3]:=40;f[23,3]:=44;f[24,3]:=48;f[25,3]:=52;f[26,3]:=56;f[27,3]:=61;f[28,3]:=65;f[29,3]:=70;f[30,3]:=75;f[31,3]:=80;f[32,3]:=85;f[33,3]:=91;f[34,3]:=96;f[35,3]:=102;f[36,3]:=108;f[37,3]:=114;f[38,3]:=120;f[39,3]:=127;f[40,3]:=133;f[41,3]:=140;f[42,3]:=147;f[43,3]:=154;f[44,3]:=161;f[45,3]:=169;f[46,3]:=176;f[47,3]:=184;f[48,3]:=192;f[49,3]:=200;f[50,3]:=208;f[51,3]:=217;f[52,3]:=225;f[53,3]:=234;f[54,3]:=243;f[55,3]:=252;f[56,3]:=261;f[57,3]:=271;f[58,3]:=280;f[59,3]:=290;f[60,3]:=300;f[61,3]:=310;f[62,3]:=320;f[63,3]:=331;f[64,3]:=341;f[65,3]:=352;f[66,3]:=363;f[67,3]:=374;f[68,3]:=385;f[69,3]:=397;f[70,3]:=408;f[71,3]:=420;f[72,3]:=432;f[73,3]:=444;f[74,3]:=456;f[75,3]:=469;f[76,3]:=481;f[77,3]:=494;f[78,3]:=507;f[79,3]:=520;f[80,3]:=533;f[81,3]:=547;f[82,3]:=560;f[83,3]:=574;f[84,3]:=588;f[85,3]:=602;f[86,3]:=616;f[87,3]:=631;f[88,3]:=645;f[89,3]:=660;f[90,3]:=675;f[91,3]:=690;f[92,3]:=705;f[93,3]:=721;f[94,3]:=736;f[95,3]:=752;f[96,3]:=768;f[97,3]:=784;f[98,3]:=800;f[99,3]:=817;f[100,3]:=833;f[101,3]:=850;f[102,3]:=867;f[103,3]:=884;f[104,3]:=901;f[105,3]:=919;f[106,3]:=936;f[107,3]:=954;f[108,3]:=972;f[109,3]:=990;f[110,3]:=1008;f[111,3]:=1027;f[112,3]:=1045;f[113,3]:=1064;f[114,3]:=1083;f[115,3]:=1102;f[116,3]:=1121;f[117,3]:=1141;f[118,3]:=1160;f[119,3]:=1180;f[120,3]:=1200;f[121,3]:=1220;f[122,3]:=1240;f[123,3]:=1261;f[124,3]:=1281;f[125,3]:=1302;f[126,3]:=1323;f[127,3]:=1344;f[128,3]:=1365;f[129,3]:=1387;f[130,3]:=1408;f[131,3]:=1430;f[132,3]:=1452;f[133,3]:=1474;f[134,3]:=1496;f[135,3]:=1519;f[136,3]:=1541;f[137,3]:=1564;f[138,3]:=1587;f[139,3]:=1610;f[140,3]:=1633;f[141,3]:=1657;f[142,3]:=1680;f[143,3]:=1704;f[144,3]:=1728;f[145,3]:=1752;f[146,3]:=1776;f[147,3]:=1801;f[148,3]:=1825;f[149,3]:=1850;f[150,3]:=1875;f[151,3]:=1900;f[152,3]:=1925;f[153,3]:=1951;f[154,3]:=1976;f[155,3]:=2002;f[156,3]:=2028;f[157,3]:=2054;f[158,3]:=2080;f[159,3]:=2107;f[160,3]:=2133;f[161,3]:=2160;f[162,3]:=2187;f[163,3]:=2214;f[164,3]:=2241;f[165,3]:=2269;f[166,3]:=2296;f[167,3]:=2324;f[168,3]:=2352;f[169,3]:=2380;f[170,3]:=2408;f[171,3]:=2437;f[172,3]:=2465;f[173,3]:=2494;f[174,3]:=2523;f[175,3]:=2552;f[176,3]:=2581;f[177,3]:=2611;f[178,3]:=2640;f[179,3]:=2670;f[180,3]:=2700;f[181,3]:=2730;f[182,3]:=2760;f[183,3]:=2791;f[184,3]:=2821;f[185,3]:=2852;f[186,3]:=2883;f[187,3]:=2914;f[188,3]:=2945;f[189,3]:=2977;f[190,3]:=3008;f[191,3]:=3040;f[192,3]:=3072;f[193,3]:=3104;f[194,3]:=3136;f[195,3]:=3169;f[196,3]:=3201;f[197,3]:=3234;f[198,3]:=3267;f[199,3]:=3300;f[200,3]:=3333;f[6,4]:=2;f[7,4]:=3;f[8,4]:=5;f[9,4]:=6;f[10,4]:=9;f[11,4]:=11;f[12,4]:=15;f[13,4]:=18;f[14,4]:=23;f[15,4]:=27;f[16,4]:=34;f[17,4]:=39;f[18,4]:=47;f[19,4]:=54;f[20,4]:=64;f[21,4]:=72;f[22,4]:=84;f[23,4]:=94;f[24,4]:=108;f[25,4]:=120;f[26,4]:=136;f[27,4]:=150;f[28,4]:=169;f[29,4]:=185;f[30,4]:=206;f[31,4]:=225;f[32,4]:=249;f[33,4]:=270;f[34,4]:=297;f[35,4]:=321;f[36,4]:=351;f[37,4]:=378;f[38,4]:=411;f[39,4]:=441;f[40,4]:=478;f[41,4]:=511;f[42,4]:=551;f[43,4]:=588;f[44,4]:=632;f[45,4]:=672;f[46,4]:=720;f[47,4]:=764;f[48,4]:=816;f[49,4]:=864;f[50,4]:=920;f[51,4]:=972;f[52,4]:=1033;f[53,4]:=1089;f[54,4]:=1154;f[55,4]:=1215;f[56,4]:=1285;f[57,4]:=1350;f[58,4]:=1425;f[59,4]:=1495;f[60,4]:=1575;f[61,4]:=1650;f[62,4]:=1735;f[63,4]:=1815;f[64,4]:=1906;f[65,4]:=1991;f[66,4]:=2087;f[67,4]:=2178;f[68,4]:=2280;f[69,4]:=2376;f[70,4]:=2484;f[71,4]:=2586;f[72,4]:=2700;f[73,4]:=2808;f[74,4]:=2928;f[75,4]:=3042;f[76,4]:=3169;f[77,4]:=3289;f[78,4]:=3422;f[79,4]:=3549;f[80,4]:=3689;f[81,4]:=3822;f[82,4]:=3969;f[83,4]:=4109;f[84,4]:=4263;f[85,4]:=4410;f[86,4]:=4571;f[87,4]:=4725;f[88,4]:=4894;f[89,4]:=5055;f[90,4]:=5231;f[91,4]:=5400;f[92,4]:=5584;f[93,4]:=5760;f[94,4]:=5952;f[95,4]:=6136;f[96,4]:=6336;f[97,4]:=6528;f[98,4]:=6736;f[99,4]:=6936;f[100,4]:=7153;f[101,4]:=7361;f[102,4]:=7586;f[103,4]:=7803;f[104,4]:=8037;f[105,4]:=8262;f[106,4]:=8505;f[107,4]:=8739;f[108,4]:=8991;f[109,4]:=9234;f[110,4]:=9495;f[111,4]:=9747;f[112,4]:=10018;f[113,4]:=10279;f[114,4]:=10559;f[115,4]:=10830;f[116,4]:=11120;f[117,4]:=11400;f[118,4]:=11700;f[119,4]:=11990;f[120,4]:=12300;f[121,4]:=12600;f[122,4]:=12920;f[123,4]:=13230;f[124,4]:=13561;f[125,4]:=13881;f[126,4]:=14222;f[127,4]:=14553;f[128,4]:=14905;f[129,4]:=15246;f[130,4]:=15609;f[131,4]:=15961;f[132,4]:=16335;f[133,4]:=16698;f[134,4]:=17083;f[135,4]:=17457;f[136,4]:=17854;f[137,4]:=18239;f[138,4]:=18647;f[139,4]:=19044;f[140,4]:=19464;f[141,4]:=19872;f[142,4]:=20304;f[143,4]:=20724;f[144,4]:=21168;f[145,4]:=21600;f[146,4]:=22056;f[147,4]:=22500;f[148,4]:=22969;f[149,4]:=23425;f[150,4]:=23906;f[151,4]:=24375;f[152,4]:=24869;f[153,4]:=25350;f[154,4]:=25857;f[155,4]:=26351;f[156,4]:=26871;f[157,4]:=27378;f[158,4]:=27911;f[159,4]:=28431;f[160,4]:=28978;f[161,4]:=29511;f[162,4]:=30071;f[163,4]:=30618;f[164,4]:=31192;f[165,4]:=31752;f[166,4]:=32340;f[167,4]:=32914;f[168,4]:=33516;f[169,4]:=34104;f[170,4]:=34720;f[171,4]:=35322;f[172,4]:=35953;f[173,4]:=36569;f[174,4]:=37214;f[175,4]:=37845;f[176,4]:=38505;f[177,4]:=39150;f[178,4]:=39825;f[179,4]:=40485;f[180,4]:=41175;f[181,4]:=41850;f[182,4]:=42555;f[183,4]:=43245;f[184,4]:=43966;f[185,4]:=44671;f[186,4]:=45407;f[187,4]:=46128;f[188,4]:=46880;f[189,4]:=47616;f[190,4]:=48384;f[191,4]:=49136;f[192,4]:=49920;f[193,4]:=50688;f[194,4]:=51488;f[195,4]:=52272;f[196,4]:=53089;f[197,4]:=53889;f[198,4]:=54722;f[199,4]:=55539;f[200,4]:=56389;f[6,5]:=1;f[7,5]:=2;f[8,5]:=3;f[9,5]:=5;f[10,5]:=7;f[11,5]:=10;f[12,5]:=13;f[13,5]:=18;f[14,5]:=23;f[15,5]:=30;f[16,5]:=37;f[17,5]:=47;f[18,5]:=57;f[19,5]:=70;f[20,5]:=84;f[21,5]:=101;f[22,5]:=119;f[23,5]:=141;f[24,5]:=164;f[25,5]:=192;f[26,5]:=221;f[27,5]:=255;f[28,5]:=291;f[29,5]:=333;f[30,5]:=377;f[31,5]:=427;f[32,5]:=480;f[33,5]:=540;f[34,5]:=603;f[35,5]:=674;f[36,5]:=748;f[37,5]:=831;f[38,5]:=918;f[39,5]:=1014;f[40,5]:=1115;f[41,5]:=1226;f[42,5]:=1342;f[43,5]:=1469;f[44,5]:=1602;f[45,5]:=1747;f[46,5]:=1898;f[47,5]:=2062;f[48,5]:=2233;f[49,5]:=2418;f[50,5]:=2611;f[51,5]:=2818;f[52,5]:=3034;f[53,5]:=3266;f[54,5]:=3507;f[55,5]:=3765;f[56,5]:=4033;f[57,5]:=4319;f[58,5]:=4616;f[59,5]:=4932;f[60,5]:=5260;f[61,5]:=5608;f[62,5]:=5969;f[63,5]:=6351;f[64,5]:=6747;f[65,5]:=7166;f[66,5]:=7599;f[67,5]:=8056;f[68,5]:=8529;f[69,5]:=9027;f[70,5]:=9542;f[71,5]:=10083;f[72,5]:=10642;f[73,5]:=11229;f[74,5]:=11835;f[75,5]:=12470;f[76,5]:=13125;f[77,5]:=13811;f[78,5]:=14518;f[79,5]:=15257;f[80,5]:=16019;f[81,5]:=16814;f[82,5]:=17633;f[83,5]:=18487;f[84,5]:=19366;f[85,5]:=20282;f[86,5]:=21224;f[87,5]:=22204;f[88,5]:=23212;f[89,5]:=24260;f[90,5]:=25337;f[91,5]:=26455;f[92,5]:=27604;f[93,5]:=28796;f[94,5]:=30020;f[95,5]:=31289;f[96,5]:=32591;f[97,5]:=33940;f[98,5]:=35324;f[99,5]:=36756;f[100,5]:=38225;f[101,5]:=39744;f[102,5]:=41301;f[103,5]:=42910;f[104,5]:=44559;f[105,5]:=46262;f[106,5]:=48006;f[107,5]:=49806;f[108,5]:=51649;f[109,5]:=53550;f[110,5]:=55496;f[111,5]:=57501;f[112,5]:=59553;f[113,5]:=61667;f[114,5]:=63829;f[115,5]:=66055;f[116,5]:=68331;f[117,5]:=70673;f[118,5]:=73067;f[119,5]:=75529;f[120,5]:=78045;f[121,5]:=80631;f[122,5]:=83273;f[123,5]:=85987;f[124,5]:=88759;f[125,5]:=91606;f[126,5]:=94512;f[127,5]:=97495;f[128,5]:=100540;f[129,5]:=103664;f[130,5]:=106852;f[131,5]:=110121;f[132,5]:=113456;f[133,5]:=116875;f[134,5]:=120362;f[135,5]:=123935;f[136,5]:=127578;f[137,5]:=131310;f[138,5]:=135114;f[139,5]:=139009;f[140,5]:=142979;f[141,5]:=147042;f[142,5]:=151182;f[143,5]:=155418;f[144,5]:=159733;f[145,5]:=164147;f[146,5]:=168642;f[147,5]:=173238;f[148,5]:=177918;f[149,5]:=182702;f[150,5]:=187572;f[151,5]:=192548;f[152,5]:=197613;f[153,5]:=202787;f[154,5]:=208052;f[155,5]:=213429;f[156,5]:=218899;f[157,5]:=224484;f[158,5]:=230165;f[159,5]:=235963;f[160,5]:=241860;f[161,5]:=247877;f[162,5]:=253995;f[163,5]:=260236;f[164,5]:=266581;f[165,5]:=273052;f[166,5]:=279629;f[167,5]:=286335;f[168,5]:=293150;f[169,5]:=300097;f[170,5]:=307156;f[171,5]:=314349;f[172,5]:=321657;f[173,5]:=329103;f[174,5]:=336666;f[175,5]:=344370;f[176,5]:=352194;f[177,5]:=360162;f[178,5]:=368253;f[179,5]:=376491;f[180,5]:=384855;f[181,5]:=393369;f[182,5]:=402012;f[183,5]:=410808;f[184,5]:=419736;f[185,5]:=428821;f[186,5]:=438040;f[187,5]:=447419;f[188,5]:=456936;f[189,5]:=466616;f[190,5]:=476437;f[191,5]:=486424;f[192,5]:=496555;f[193,5]:=506856;f[194,5]:=517304;f[195,5]:=527925;f[196,5]:=538696;f[197,5]:=549644;f[198,5]:=560745;f[199,5]:=572026;f[200,5]:=583464;f[6,6]:=1;f[7,6]:=1;f[8,6]:=2;f[9,6]:=3;f[10,6]:=5;f[11,6]:=7;f[12,6]:=11;f[13,6]:=14;f[14,6]:=20;f[15,6]:=26;f[16,6]:=35;f[17,6]:=44;f[18,6]:=58;f[19,6]:=71;f[20,6]:=90;f[21,6]:=110;f[22,6]:=136;f[23,6]:=163;f[24,6]:=199;f[25,6]:=235;f[26,6]:=282;f[27,6]:=331;f[28,6]:=391;f[29,6]:=454;f[30,6]:=532;f[31,6]:=612;f[32,6]:=709;f[33,6]:=811;f[34,6]:=931;f[35,6]:=1057;f[36,6]:=1206;f[37,6]:=1360;f[38,6]:=1540;f[39,6]:=1729;f[40,6]:=1945;f[41,6]:=2172;f[42,6]:=2432;f[43,6]:=2702;f[44,6]:=3009;f[45,6]:=3331;f[46,6]:=3692;f[47,6]:=4070;f[48,6]:=4494;f[49,6]:=4935;f[50,6]:=5427;f[51,6]:=5942;f[52,6]:=6510;f[53,6]:=7104;f[54,6]:=7760;f[55,6]:=8442;f[56,6]:=9192;f[57,6]:=9975;f[58,6]:=10829;f[59,6]:=11720;f[60,6]:=12692;f[61,6]:=13702;f[62,6]:=14800;f[63,6]:=15944;f[64,6]:=17180;f[65,6]:=18467;f[66,6]:=19858;f[67,6]:=21301;f[68,6]:=22856;f[69,6]:=24473;f[70,6]:=26207;f[71,6]:=28009;f[72,6]:=29941;f[73,6]:=31943;f[74,6]:=34085;f[75,6]:=36308;f[76,6]:=38677;f[77,6]:=41134;f[78,6]:=43752;f[79,6]:=46461;f[80,6]:=49342;f[81,6]:=52327;f[82,6]:=55491;f[83,6]:=58767;f[84,6]:=62239;f[85,6]:=65827;f[86,6]:=69624;f[87,6]:=73551;f[88,6]:=77695;f[89,6]:=81979;f[90,6]:=86499;f[91,6]:=91164;f[92,6]:=96079;f[93,6]:=101155;f[94,6]:=106491;f[95,6]:=111999;f[96,6]:=117788;f[97,6]:=123755;f[98,6]:=130019;f[99,6]:=136479;f[100,6]:=143247;f[101,6]:=150224;f[102,6]:=157532;f[103,6]:=165056;f[104,6]:=172929;f[105,6]:=181038;f[106,6]:=189509;f[107,6]:=198230;f[108,6]:=207338;f[109,6]:=216705;f[110,6]:=226479;f[111,6]:=236534;f[112,6]:=247010;f[113,6]:=257783;f[114,6]:=269005;f[115,6]:=280534;f[116,6]:=292534;f[117,6]:=304865;f[118,6]:=317683;f[119,6]:=330850;f[120,6]:=344534;f[121,6]:=358579;f[122,6]:=373165;f[123,6]:=388138;f[124,6]:=403670;f[125,6]:=419609;f[126,6]:=436140;f[127,6]:=453091;f[128,6]:=470660;f[129,6]:=488678;f[130,6]:=507334;f[131,6]:=526461;f[132,6]:=546261;f[133,6]:=566547;f[134,6]:=587535;f[135,6]:=609040;f[136,6]:=631269;f[137,6]:=654039;f[138,6]:=677571;f[139,6]:=701661;f[140,6]:=726544;f[141,6]:=752019;f[142,6]:=778311;f[143,6]:=805221;f[144,6]:=832989;f[145,6]:=861394;f[146,6]:=890691;f[147,6]:=920661;f[148,6]:=951549;f[149,6]:=983139;f[150,6]:=1015691;f[151,6]:=1048966;f[152,6]:=1083239;f[153,6]:=1118274;f[154,6]:=1154336;f[155,6]:=1191191;f[156,6]:=1229120;f[157,6]:=1267865;f[158,6]:=1307723;f[159,6]:=1348439;f[160,6]:=1390299;f[161,6]:=1433051;f[162,6]:=1476997;f[163,6]:=1521860;f[164,6]:=1567959;f[165,6]:=1615020;f[166,6]:=1663351;f[167,6]:=1712680;f[168,6]:=1763332;f[169,6]:=1815010;f[170,6]:=1868056;f[171,6]:=1922176;f[172,6]:=1977700;f[173,6]:=2034337;f[174,6]:=2092435;f[175,6]:=2151676;f[176,6]:=2212426;f[177,6]:=2274370;f[178,6]:=2337862;f[179,6]:=2402590;f[180,6]:=2468926;f[181,6]:=2536531;f[182,6]:=2605795;f[183,6]:=2676382;f[184,6]:=2748670;f[185,6]:=2822326;f[186,6]:=2897747;f[187,6]:=2974571;f[188,6]:=3053214;f[189,6]:=3133318;f[190,6]:=3215286;f[191,6]:=3298763;f[192,6]:=3384171;f[193,6]:=3471126;f[194,6]:=3560070;f[195,6]:=3650622;f[196,6]:=3743211;f[197,6]:=3837459;f[198,6]:=3933815;f[199,6]:=4031871;f[200,6]:=4132096;

    readln(n,k);

    writeln(f[n,k]);

    end.

    不打表对不起这题啊!

  • 0
    @ 2009-11-03 16:42:13

    此题太水了,就是数学递推公式。

    晒一下程序:~~~~~~

    var

    n,k:longint;

    function work(n,k:longint):longint;

    begin

    if (k=2) and (n>0) then begin work:=n div 2;exit;end;

    if (N>0)and (k=1) then begin work:=1;exit;end;

    if (k=n-1) and (n>0) then begin work:=1;exit;end;

    if (k=n) and (k>0) then begin work:=1;exit;end;

    if (n>0) and (k>0) then

    work:=work(n-1,k-1)+work(n-k,k);

    end;

    begin

    readln(n,k);

    writeln(work(n,k));

    end.

  • 0
    @ 2009-11-02 22:18:28

    var

    f:array [0..200,0..200] of longint;

    n,m,i,j,k:longint;

    begin

    readln(n,m);

    f[0,0]:=1;

    for i:=1 to n do

    for j:=i to n do

    for k:=m downto 1 do

    f[j,k]:=f[j,k]+f[j-i,k-1];

    writeln(f[n,m]);

    end.

  • 0
    @ 2009-10-31 20:10:11

    var

    a:array [0..200,0..6] of longint;

    n,m,i,j,k,l:longint;

    begin

    readln(n,m);

    a[0,0]:=1;

    for i:=1 to n do

    for j:=i to n do

    for k:=m downto 1 do

    a[j,k]:=a[j,k]+a[j-i,k-1];

    writeln(a[n,m]);

    end.

    O(n^2*k)

    • @ 2013-10-20 18:56:54

      a[j,k]:=a[j,k]+a[j-i,k-1]; 为什么?可以证明吗?

  • 0
    @ 2009-10-22 21:30:26

    编译通过...

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

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

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

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

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

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

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

    直接深搜...

    这样都0ms...

  • 0
    @ 2009-10-22 10:29:27

    Orz楼下....

  • 0
    @ 2009-10-22 09:57:21

    编译通过...

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

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

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

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

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

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

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

    procedure shuchu;

    begin

    lp:=lp+1;

    end;

    procedure search(i:integer);

    var j,q:longint;

    begin

    for j:=x to n do

    begin

    x[i]:=j;

    d:=d+x[i];

    if d>n then begin d:=d-x[i];exit;end;

    if i=x[i] then shuchu;

    d:=d-j; end;end;

    begin

    read(n); x[0]:=1;

    fillchar(b,sizeof(b),true);

    read(k);

    search(1);

    writeln(lp);

    end.

    深搜ac

  • 0
    @ 2009-10-17 20:36:54

    整数p的k布拆分,递归

信息

ID
1117
难度
3
分类
动态规划 点击显示
标签
递交数
6168
已通过
3140
通过率
51%
被复制
14
上传者