LINGO 帮我改改,我想要输出的结果是s(1)=1,s(2)=4,s(3)=2,s(4)=3,model:sets:a/1,2,3,4/;b/1,2,3,4/;c(a,b):x;sx/1,2,3,4/:s;endsetsdata:x= 0 0 0 10 0 1 00 0 0 00 1 0 0;enddatacalc:s(1)=1;@for(sx(k)|k#ge#1 #and# k#le#3:@for(c(i,j)|j#ge#2 #and# j

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/15 10:58:08

LINGO 帮我改改,我想要输出的结果是s(1)=1,s(2)=4,s(3)=2,s(4)=3,model:sets:a/1,2,3,4/;b/1,2,3,4/;c(a,b):x;sx/1,2,3,4/:s;endsetsdata:x= 0 0 0 10 0 1 00 0 0 00 1 0 0;enddatacalc:s(1)=1;@for(sx(k)|k#ge#1 #and# k#le#3:@for(c(i,j)|j#ge#2 #and# j
LINGO 帮我改改,我想要输出的结果是s(1)=1,s(2)=4,s(3)=2,s(4)=3,
model:
sets:
a/1,2,3,4/;
b/1,2,3,4/;
c(a,b):x;
sx/1,2,3,4/:s;
endsets
data:
x= 0 0 0 1
0 0 1 0
0 0 0 0
0 1 0 0;
enddata
calc:
s(1)=1;
@for(sx(k)|k#ge#1 #and# k#le#3:
@for(c(i,j)|j#ge#2 #and# j#le#4:
s(k+1)=@if(x(s(k),j)#eq#1,j,null)
);
);
endcalc
end

LINGO 帮我改改,我想要输出的结果是s(1)=1,s(2)=4,s(3)=2,s(4)=3,model:sets:a/1,2,3,4/;b/1,2,3,4/;c(a,b):x;sx/1,2,3,4/:s;endsetsdata:x= 0 0 0 10 0 1 00 0 0 00 1 0 0;enddatacalc:s(1)=1;@for(sx(k)|k#ge#1 #and# k#le#3:@for(c(i,j)|j#ge#2 #and# j

你的是这个逻辑?

! s(1) = 1;
! k = 1, s(1) = 1, 第 1 行 第 4 个为 1, 所以 s(2) = 4 ;
! k = 2, s(2) = 4, 第 4 行 第 2 个为 1, 所以 s(3) = 2;
! k = 3, s(3) = 3, 第 2 行 第 3 个为 1, 所以 s(4) = 3;