Xpress-IVE 建模问题

cy411522

哪位高人能帮小弟解决这个问题，小弟不甚感激！！！
8 B- ^4 U7 K( hmodel "Burglar 1"
uses "mmxprs"
. ]- u& i( L4 N$ q8 C- @% ]declarations
ITEMS = 1..8 ! 物品标号范围
& M  |& ]( i- V/ l9 {% OWTMAX = 102 ! 允许携带的重量最大值
7 _* `0 k7 f& [% fVALUE: array(ITEMS) of real ! 物品价值
2 i. g$ q+ z. q0 d# U5 P2 pWEIGHT: array(ITEMS) of real ! 物品重量
1 l- D* ]$ u9 m  w: J- Itake: array(ITEMS) of mpvar ! 1 表示带走物品i，0 表示不带走物品i
end-declarations
" y9 t. u5 W' f8 \. G9 |7 \& T) b' Y1 g! 物品: 1 2 3 4 5 6 7 8
, y; `/ P& y' Q, H: f* d, tVALUE := [ 15, 100, 90, 60, 40, 15, 10, 1]
WEIGHT := [ 2, 20, 20, 30, 40, 30, 60, 10]
( r! C' Q. k$ _0 O1 ]5 }1 p! 目标: 使带走的总价值最大
& M' L% ]! P$ F: E/ V5 OMaxVal:= sum(i in ITEMS) VALUE(i)*take(i)
! 重量限制
5 |4 K' ~, t- Xsum(i in ITEMS) WEIGHT(i)*take(i) <= WTMAX
0 O- W6 M3 E/ @# N2 ]! 所有变量取值都为0 或1
4 t# T8 M' u& J0 tforall(i in ITEMS) take(i) is_binary
maximize(MaxVal) ! 求解混合整数问题
# _$ M0 T/ k, `4 \! 打印输出结果
3 ]. @/ @+ z  b6 `% r+ Qwriteln("Solution:\n Objective: ", getobjval)
forall(i in ITEMS) writeln(" take(", i, "): ", getsol(take(i)))
end-model
这段程序运行不了

yunyun842

VALUE := [ 15, 100, 90, 60, 40, 15, 10, 1]
WEIGHT := [ 2, 20, 20, 30, 40, 30, 60, 10]
换成
VALUE :: [ 15, 100, 90, 60, 40, 15, 10, 1]
WEIGHT :: [ 2, 20, 20, 30, 40, 30, 60, 10]
试试！

空木葬花

非常感谢楼主的福利！