永发信息网

lingo的循环程序

答案:1  悬赏:0  手机版
解决时间 2021-02-19 15:00
sets:
zones/1..20/:Q,n,m;
endsets
data:
Q=156.02 80.45 83.39 94.36 116.10 273.3 1163.10 94.36 83.39 80.45 97.22 80.77 141.71 80.77 97.22 229.46 51.16 62.95 46.78 119.23;
enddata

max = Q(i)-25*n(i)-5*m(i);

50*n(i)+10*m(i) > Q(i);

25*n(i)+5*m(i) < Q(i);

@abs(n(i)+m(i)-n(j)-m(j)) < 3

@gin(n);@gin(m);
大家帮忙看看这个程序 我想加一个循环 让Q依次 循环并且满以下条件 最后一个条件是指各个Q点地区n 和 m 的总数相差小于3,即:|n(i)+n(j)-n(j)-m(j)|<3
请高手给我编一下 谢谢 是不是有个循环 我不会那个语句
帮我写出来吧
最佳答案
1163.10这个数据不对吧,否则找不到可行解 我改成116.10了

sets:
zones/1..20/:Q,n,m;
endsets
data:
Q=156.02 80.45 83.39 94.36 116.10 273.3 116.10 94.36 83.39 80.45 97.22 80.77 141.71 80.77 97.22 229.46 51.16 62.95 46.78 119.23;
enddata

max =@sum(zones: Q-25*n-5*m);

@for(zones:50*n+10*m >Q);

@for(zones:25*n+5*m <Q);

@for(zones(i):@for(zones(j):@abs(n(i)+m(i)-n(j)-m(j)) < 3));

@for(zones:@gin(n));@for(zones:@gin(m));

结果N( 1) 2.000000 45.00000
N( 2) 1.000000 20.00000
N( 3) 1.000000 20.00000
N( 4) 1.000000 25.00000
N( 5) 1.000000 35.00000
N( 6) 5.000000 25.00000
N( 7) 1.000000 25.00000
N( 8) 1.000000 25.00000
N( 9) 1.000000 20.00000
N( 10) 1.000000 20.00000
N( 11) 1.000000 25.00000
N( 12) 1.000000 20.00000
N( 13) 2.000000 25.00000
N( 14) 1.000000 20.00000
N( 15) 1.000000 25.00000
N( 16) 4.000000 25.00000
N( 17) 0.000000 25.00000
N( 18) 0.000000 25.00000
N( 19) 0.000000 25.00000
N( 20) 1.000000 25.00000
M( 1) 6.000000 25.00000
M( 2) 4.000000 0.000000
M( 3) 4.000000 0.000000
M( 4) 5.000000 5.000000
M( 5) 7.000000 15.00000
M( 6) 3.000000 5.000000
M( 7) 7.000000 5.000000
M( 8) 5.000000 5.000000
M( 9) 4.000000 0.000000
M( 10) 4.000000 0.000000
M( 11) 5.000000 5.000000
M( 12) 4.000000 0.000000
M( 13) 5.000000 5.000000
M( 14) 4.000000 0.000000
M( 15) 5.000000 5.000000
M( 16) 3.000000 5.000000
M( 17) 6.000000 5.000000
M( 18) 7.000000 5.000000
M( 19) 5.000000 5.000000
M( 20) 7.000000 5.000000
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
李舒杨名字测试
北汽幻速杰臣鑫汽车销售服务有限公司怎么去啊
什么牌子的电蒸锅好
地球绕着地轴不停地旋转叫自转,绕着太阳不停
众果乐水果超市我想知道这个在什么地方
有人说 当一名幼师不需要理论对吗
苹果7 10.32系统升级后怎么关闭开机密码
男人没有扁担怎么办
春燕发型设计在什么地方啊,我要过去处理事情
英雄联盟registry.cfg文件损坏怎么修复
连一连,填一填:(1)将经济部门与它们在发
上海的继续医学教育学分到哪里查?
刘家综合商店这个地址在什么地方,我要处理点
你怎么知道那个人是我?用英语怎么说?
得道之人话很少什么意思
推荐资讯
【爱情哲学】哲学家的爱情是什么
联通怎样在网上取消流量包
人体最大能承受多少安培的电流?
黄豆芽包子怎么做?陷的配料?
甲乙两人共植树138棵,甲所植的树是乙所值得
铁岭到鞍山开车要多久
郑凯开了个白色的跑车抢别人董事长的车位是个
相同质量的一氧化碳和二氧化碳中氧元素的质量
长兴饭店这个地址在什么地方,我要处理点事
love,rosie里1小时01分放的音乐叫什么
黄马褂是什么意思
NESO移动硬盘连接插入后,电脑里找不到该硬盘
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?