VB中一次多项不等式求极值的问题？高分悬赏

来源：百度知道 编辑：UC知道 时间：2024/06/02 19:23:34
比如说有四个不等式：
11A+12B+13C+14D<=100
10A+24D+7C+8D<=110
21A+15D+8C+10D<=174
55A+34D+27C+18D<=310

求同时使这四个不等式成立时的A，B，C，D的最大值（其中A，B，C，D是正整数）。
如果用VB实现？

如果有十二个未知项呢？又如何实现？

四个的成功解决悬赏40分，十二个成功解决的悬赏80分。
我已经说过了，是求那些不等式同时成立是的a,b,c,d等的最大值，不等式同时成立，未知项都要最大。要VB代码。

不知道是A,B,C,D同时最大还是只求A，B，C，D四个方程式成立时最大的值。附上Java写的一点代码：
for (int a = 0; a <= 9; a++) {
for (int b = 0; b <= 8; b++) {
for (int c = 0; c <= 7; c++) {
for (int d = 0; d <= 7; d++) {
if (11 * a + 12 * b + 13 * c + 14 * d <= 100
&& 10 * a + 24 * b + 7 * c + 8 * d <= 110
&& 21 * a + 15 * b + 8 * c + 10 * d <= 174
&& 55 * a + 34 * b + 27 * c + 18 * d <= 310) {
System.out.print(a + " ");
System.out.print(b + " ");
System.out.print(c + " ");
System.out.print(d + " ");
System.out.println("");
}
}
}
}
}

用循环嵌号~