作业帮 > 数学 > 作业

用vb编写求解线性目标函数最小值,约束条件中有线性等式.

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/07/13 19:57:03
用vb编写求解线性目标函数最小值,约束条件中有线性等式.
目标函数:f=5i+j+6k 求其最小值
约束条件:i+j+k=41808
13000
逻辑错误,首先是if 要写在循环里面,其次你没有做大小判断,会把所有的结果全打出来.
另外n = 5i+j+6k不是合法的表达式,乘号要写的.

应该这样
dim i,j,k,n as long
dim i1,j1,k1, result as long
for i = 13000 to 20000
for j=10000 to 16000
for k = 8000 to 12000
if i+j+k=41808 then
    n=5*i+j+6*K
    if result=0 or n<result then
        result=n
        i1=i
        j1=j
        k1=k
    end if

next
next
next
print "i=" & cstr(i1) & ";j=" & cstr(j1) & ";k=" & cstr(k1) & " 结果=" &cstr(result)