快捷通道

QQ登录

只需要一步，快速开始

  注册地址  找回密码

数学建模社区-数学中国

留学>>
123下一页
返回列表 发新帖
查看: 4322|回复: 22
打印 上一主题 下一主题

[问题求助] 各位高手，帮忙改个程序

[复制链接]
字体大小: 正常 放大
笑傲天方 实名认证       

8

主题

3

听众

773

积分

升级  43.25%

  • TA的每日心情
    开心
    2012-5-1 14:00

    • 签到天数: 138 天

    [LV.7]常住居民III

    群组: Matlab讨论组

    群组: 南京邮电大学数模协会
    跳转到指定楼层
    1#
    发表于 2011-7-23 23:16 |只看该作者 |正序浏览
    |招呼Ta 关注Ta
    本帖最后由 笑傲天方 于 2011-7-23 23:24 编辑

    未命名.jpg

    这是2000年国赛B题第一题的LINGO程序，初学编的，求高手帮忙修正。
    MODEL:
    SETS:
    GCH/S1..S7/:SI,XI;
    ZHD/A1..A15/:HM,YJ,ZJ,WJ;
    YL(GCH,ZHD):C,Y;
    ENDSETS
    DATA:
    SI=800,800,1000,2000,2000,2000,3000;
    HM=1,2,3,4,5,6,7,8,9,10,11,12,13,14,15;
    WJ=104,301,750,606,194,205,201,680,480,300,220,210,420,500,0;
    C=330.7 370.7 385.7 420.7 410.7 410.7 435.7 3
      20.3 360.3 375.3 410.3 400.3 405.3 425.3
      300.2 345.2 355.2 395.2 380.2 385.2 405.2
      258.6 326.6 336.3 376.6 361.6 366.6 386.6
      198.0 266.0 276.0 316.0 301.0 306.0 326.0
      180.5 250.5 260.5 300.5 285.5 295.5 310.5
      163.1 241.0 251.0 291.0 276.0 281.0 301.0
      181.2 226.2 241.2 276.2 266.2 271.2 291.2
      224.2 269.2 203.2 244.2 234.2 234.2 259.2
      252.0 297.0 237.0 222.0 212.0 212.0 236.0
      256.0 301.0 241.0 211.0 188.0 201.0 226.0
      266.0 311.0 251.0 221.0 206.0 195.0 216.0
      281.2 362.2 266.2 236.2 226.2 176.2 198.2
      288.0 333.0 273.0 243.0 228.0 161.0 186.0
      302.0 347.0 287.0 257.0 242.0 178.0 162.0;
    ENDDATA
    MIN= @SUM(YL(I,J):C(I,J)*Y(I,J))+0.05* @SUM(ZHD:ZJ*(ZJ-1)+(WJ-ZJ)*(WJ-ZJ-1));
    @FOR(GCH(I): @SUM(ZHD(J):Y(I,J))<=SI(I)*XI(I));
    @FOR(GCH(I): @SUM(ZHD(J):Y(I,J))>=500*XI(I));
    @SUM(YL(I,J):Y(I,J))=5171;
    @FOR(ZHD(J)|HM(J)#LT#15: @SUM(GCH(I):Y(I,J))=ZJ(J)+WJ(J)-ZJ(J-1));
    @FOR(ZHD(J): @SUM(GCH(I):Y(I,1))=ZJ(1));
    @FOR(ZHD(J): @SUM(GCH(I):Y(I,15))=WJ(14)-ZJ(14));
    @FOR(GCH(I): @BIN(XI(I)));
    @FOR(ZHD(J)|HM(J)#LT#15:ZJ(J)<=WJ(J));
    END
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    回复

    使用道具 举报

    笑傲天方 实名认证       

    8

    主题

    3

    听众

    773

    积分

    升级  43.25%

  • TA的每日心情
    开心
    2012-5-1 14:00

    • 签到天数: 138 天

    [LV.7]常住居民III

    群组: Matlab讨论组

    群组: 南京邮电大学数模协会
    23#
    发表于 2011-8-4 19:59 |只看该作者 |招呼Ta 关注Ta
    I_know__!!!! 发表于 2011-8-4 17:39
    怎么会是数据出错尼？有写错最后一行数据吗？最后一个数。

    那个3是下一行的，打错了，320.3
    回复

    使用道具 举报

    I_know__!!!!        

    12

    主题

    3

    听众

    674

    积分

    升级  18.5%

  • TA的每日心情
    难过
    2013-11-8 08:12

    • 签到天数: 114 天

    [LV.6]常住居民II

    群组: Matlab讨论组

    群组: 数模应用

    群组: 我们一定会赢

    群组: 第一期sas基础实训课堂
    22#
    发表于 2011-8-4 17:39 |只看该作者 |招呼Ta 关注Ta
    怎么会是数据出错尼？有写错最后一行数据吗？最后一个数。
    回复

    使用道具 举报

    linghai06        

    0

    主题

    1

    听众

    6

    积分

    升级  1.05%

    该用户从未签到
    21#
    发表于 2011-7-25 18:30 |只看该作者 |招呼Ta 关注Ta
    看不懂
    …………………………
    回复

    使用道具 举报

    建模小菜 实名认证       

    1

    主题

    3

    听众

    30

    积分

    升级  26.32%

    该用户从未签到

    群组: 数学建模培训课堂2
    20#
    发表于 2011-7-25 10:32 |只看该作者 |招呼Ta 关注Ta
    建模小菜 发表于 2011-7-25 10:30
    我也不知道哪错  我有这个程序   反正我也新手 你自己看看吧  我给你个附件吧

    没有积分给我发QQ消息 我给你传34501998
    回复

    使用道具 举报

    建模小菜 实名认证       

    1

    主题

    3

    听众

    30

    积分

    升级  26.32%

    该用户从未签到

    群组: 数学建模培训课堂2
    19#
    发表于 2011-7-25 10:30 |只看该作者 |招呼Ta 关注Ta
    我也不知道哪错  我有这个程序   反正我也新手 你自己看看吧  我给你个附件吧

    lingo.txt

    1.47 KB, 下载次数: 6, 下载积分: 体力 -2 点
    回复

    使用道具 举报

    建模小菜 实名认证       

    1

    主题

    3

    听众

    30

    积分

    升级  26.32%

    该用户从未签到

    群组: 数学建模培训课堂2
    18#
    发表于 2011-7-25 10:27 |只看该作者 |招呼Ta 关注Ta
    model:
    sets:
    sell/1..7/:p,s,x,m;
    need/1..21/:t,w,l,d;
    link(sell,need):c,y;
    endsets
    data:
    p=160 155  155  160 155 150 160;
    s=800 800 1000 2000 2000 2000 3000;
    d=104,301,750,606,194,205,201,680,480,300,220,210,420,500,0,0,0,0,0,0,0;
    c=170.7        160.3        140.2        98.6        38        20.5        3.1        21.2        64.2        92        96        106        121.2        128        142        60        95        100        105        115        125
    215.7        205.3        190.2        171.6        111        95.5        86        71.2        114.2        142        146        156        171.2        178        192        110        145        150        155        165        175
    230.7        220.3        200.2        181.6        121        105.5        96        86.2        48.2        82        86        96        111.2        118        132        44        85        90        95        105        115
    260.7        250.3        235.2        216.6        156        140.5        131        116.2        84.2        62        51        61        76.2        83        97        80        50        55        60        70        80
    255.7        245.3        225.2        206.6        146        130.5        121        111.2        79.2        57        33        51        71.2        73        87        75        32        45        50        65        75
    260.7        250.3        235.2        216.6        156        140.5        128.1        116.2        84.2        61        47        37        16.2        11        28        80        46        33        36        10        0
    275.7        265.3        245.2        226.6        166        150.5        141        131.2        99.2        76        64        56        38.2        26        2        95        63        50        55        32        26;
    enddata
    min=@sum(sell(i):p(i)*x(i))+0.1*@sum(need(j):t(j)*(t(j)+1)/2+w(j)*(w(j)+1)/2)+@sum(link(i,j):c(i,j)*y(i,j))+0.1*@sum(need(j)|j#eq#9#and#j#eq#11#and#j#eq#17:l(j)*(l(j)+1)/2);
    @sum(sell(i):m(i))<=7;
    @for(sell(i):x(i)>=500*m(i));
    @for(sell(i):x(i)<=s(i)*m(i));
    @for(sell(i)sum(need(j):y(i,j))=x(i));
    @for(need(j)sum(sell(i):y(i,j))=w(j)+t(j)+l(j));
    @for(need(j)|j#le#14:w(j)+t(j+1)=d(j));
    @for(need(j)|j#eq#9#and#j#eq#11#and#j#eq#17:l(j)=0);
    l(9)+t(16)=42;t(17)+w(18)=130;w(17)+t(19)=190;
    l(11)+l(17)=10;w(19)+l(20)=260;w(20)+t(21)=100;
    t(1)=0;w(15)=0;w(16)=0;t(18)=0;w(21)=0;
    @for(sell(i)bin(m(i)));
    end
    回复

    使用道具 举报

    1564093494 实名认证       

    3

    主题

    3

    听众

    435

    积分

    升级  45%

  • TA的每日心情
    开心
    2015-4-15 01:01

    • 签到天数: 71 天

    [LV.6]常住居民II

    自我介绍
    有点内向，有点自卑，还有点懦弱，但一直努力着

    群组: 小草的客厅

    群组: Matlab讨论组

    群组: 数学建模

    群组: 数学趣味、游戏、IQ等

    群组: C 语言讨论组
    17#
    发表于 2011-7-24 22:51 |只看该作者 |招呼Ta 关注Ta
    飘过~~~~~~~~~~~
    回复

    使用道具 举报

    xy259 实名认证       

    3

    主题

    3

    听众

    139

    积分

    升级  19.5%

  • TA的每日心情
    无聊
    2012-10-26 11:44

    • 签到天数: 13 天

    [LV.3]偶尔看看II
    16#
    发表于 2011-7-24 19:42 |只看该作者 |招呼Ta 关注Ta
    tiao1=[562 548 224 545 41 445 745 512];
    tiao2=[47 48 57 58 54 52 65 48];
    t=0:7;
    [ax,h1]=plotyy(t,tiao1,t,tiao2,@bar,@plot);
    set(h1,'facecolor','g');
    set(ax(1),'ytick',0:100:1000);
    set(ax(2),'ylim',[0 100],'ytick',0:10:100);
    回复

    使用道具 举报

    xy259 实名认证       

    3

    主题

    3

    听众

    139

    积分

    升级  19.5%

  • TA的每日心情
    无聊
    2012-10-26 11:44

    • 签到天数: 13 天

    [LV.3]偶尔看看II
    15#
    发表于 2011-7-24 19:41 |只看该作者 |招呼Ta 关注Ta
    tiao1=[562 548 224 545 41 445 745 512];
    tiao2=[47 48 57 58 54 52 65 48];
    t=0:7;
    [ax,h1]=plotyy(t,tiao1,t,tiao2,@bar,@plot);
    set(h1,'facecolor','g');
    set(ax(1),'ytick',0:100:1000);
    set(ax(2),'ylim',[0 100],'ytick',0:10:100);
    回复

    使用道具 举报

    123下一页
    返回列表 发新帖
    高级模式
    B Color Image Link Quote Code Smilies
    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩

    • 电话咨询

    • 04714969085

    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问：王兆丰

    GMT+8, 2026-4-12 11:04 , Processed in 0.510593 second(s), 105 queries .

    回顶部