程序如下:
max=(a0+a1+a2+a3+a4+a5+a6+a7+a8+a9)-(b0+b1+b2+b3+b4+b5+b6+b7+b8+b9)-(c0+c1+c2+c3+c4+c5+c6+c7+c8+c9)+(d0+d1+d2+d3+d4+d5+d6+d7+d8+d9);
a0=-0.2671*(x01^2+x02^2)+11.4183*(x01+x02)+1.3873*2+47.36+38.07;
a1=-0.2744*(x11^2+x12^2)+12.1778*(x11+x12)+2.0648*2+81.93+51.80+51.31+28.26;
a2=-0.2631*(x21^2+x22^2)+12.4521*(x21+x22)+2.5588*2+14.75+42.92+26.41+42.92;
a3=0.0682*(x31^3+x32^3)-1.9654*(x31^2+x32^2)+36.0104*(x31+x32)-2.0803*2+60.62+99.30+121.88;
a4=0.0584*(x41^3+x42^3)-1.9019*(x41^2+x42^2)+39.7564*(x41+x42)-0.5955*2+131.74+193.50+255.51;
a5=0.0783*(x51^3+x52^3)-2.2395*(x51^2+x52^2)+41.9655*(x51+x52)-1.5942*2+135.45+90.55+112.33+162.03;
a6=0.1045*(x61^3+x62^3)-2.7425*(x61^2+x62^2)+44.6484*(x61+x62)-3.1439*2+124.01+151.76+108.94;
a7=0.0179*(x71^4+x72^4)-0.2415*(x71^3+x72^3)-0.8961*(x71^2+x72^2)+45.7193*(x71+x72)-0.6727*2+176.40+162.52+132.58+147.93;
a8=0.0985*(x81^3+x82^3)-2.7237*(x81^2+x82^2)+46.9763*(x81+x82)-2.6833*2+104.98+140.75+43.93+123.39;
a9=0.1048*(x91^3+x92^3)-2.9051*(x91^2+x92^2)+50.6082*(x91+x92)-2.703*2+115.98+101.34+217.03+287.73;
b0=-0.0058*(8+x01)^2+0.7178*(8+x01)+2.2137;
b1=-0.0066*(20+x11)^2+0.7858*(20+x11)+2.4092;
b2=-0.0067*(10+x21)^2+0.8178*(10+x21)+2.4855;
b3=-0.0177*(10+x31)^2+1.8976*(10+x31)+0.8632;
b4=-0.0196*(20+x41)^2+2.1536*(20+x41)+6.8746;
b5=-0.0211*(15+x51)^2+2.2510*(15+x51)+6.8553;
b6=0.0011*(11+x61)^3-0.0844*(11+x61)^2+3.1029*(11+x61)+4.9506;
b7=0.0011*(17+x71)^3-0.0906*(17+x71)^2+3.3277*(17+x71)+5.2847;
b8=0.0011*(10+x81)^3-0.0954*(10+x81)^2+3.5112*(10+x81)+5.5989;
b9=0.0012*(5+x91)^3-0.0984*(5+x91)^2+3.6110*(5+x91)+5.6761;
c0=0.0002*x0^3-0.0735*x0^2+7.7904*x0+1.8542;
c1=0.0005*x1^3-0.0949*x1^2+8.7093*x1+1.4070;
c2=0.0002*x2^3-0.0834*x2^2+8.8314*x2+2.0939;
c3=0.0001*x3^3-0.1894*x3^3+20.2089*x3+6.1389;
c4=-0.2010*x4^2+22.8334*x4+8.0202;
c5=-0.2157*x5^2+23.7311*x5+7.5642;
c6=0.0065*x6^3-0.6369*x6^2+29.0853*x6-3.4501;
c7=0.0003*x7^4-4.0174*x7^3-0.0573*x7^2+25.7657*x7+6.6843;
c8=0.0073*x8^3-0.7210*x8^2+32.9269*x8-3.9249;
c9=0.0076*x9^3-0.7409*x9^2+33.7914*x9-4.2823;
d0=0.0070*x02^3-0.2024*x02^2+2.3288*x02-0.0140;
d1=0.0101*x12^3-0.2572*x12^2+2.6463*x12-0.0346;
d2=0.0189*x22^3-0.3986*x22^2+3.2644*x22-0.4915;
d3=0.0293*x32^3-0.7339*x32^2+7.0365*x32-0.8632;
d4=0.0367*x42^3-0.8843*x42^2+8.2061*x42-0.8670;
d5=0.0354*x52^3-0.8631*x52^2+8.1944*x52-0.5351;
d6=0.0387*x62^3-0.9269*x62^2+8.5683*x62-0.9010;
d7=0.0435*x72^3-1.0373*x72^2+9.4151*x72-1.3150;
d8=0.0446*x82^3-1.0910*x82^2+9.9706*x82-1.4294;
d9=0.0498*x92^3-1.1772*x92^2+10.4393*x92-1.6511;
x0=8.0+x01+x02;x1=20+x11+x12;x2=10+x21+x22;
x3=10+x31+x32;x4=20+x41+x42;x5=15+x51+x52;
x6=11+x61+x62;x7=17+x71+x72;
x8=10+x81+x82;x9=5.0+x91+x92;
x01<=3;x02<=4;
x11<=3;x12<=4;
x21<=2;x22<=4;
x31<=5;x32<=4;
x41<=5;x42<=4;
x51<=2;x52<=3;
x61<=4;x62<=4;
x71<=10;x72<=5;
x81<=3;x82<=3;
x91<=4;x92<=3;
x0+x1+x2<=50;
x3+x4+x5<=65;
x6+x7+x8+x9<=62;
运行后提示要用LINDO啊 !!!请高手破解................................
1017是lingo破解版的问题
建议换个版本试试
我用lingo10可以求解,不过找不到可行解,估计你的约束条件有问题
你对a b c d是否没有正负的限制
但是lingo默认会认为所有变量非负 所以就有问题了
你需要用@free取消符号限制 比如@free(a0);
我也试了,找不到可行解。再一个,不是让你用lindo,应该是让你访问网站的吧。lingo比lindo要高级一些。