来源：学生作业帮 编辑：搜搜考试网作业帮 分类：综合作业 时间：2024/04/27 23:51:01
如何在lingo输入如下式子
i,j=1、2、……16
model:
sets:
s/1..16/:a,l;
ss(s,s):x,x0;
endsets
data:
!必须写;
x0=;
a=;
l=;
enddata
calc:
@for(ss: @ifc(x0#eq#0:x=0;));
endcalc
min=@sum(ss|x0#ne#0:x*@log(x/x0));
@for(s(i):@sum(s(j):x(i,j))=a(i));
@for(s(j):@sum(s(i):x(i,j))=l(j));
end
搜搜考试网