数学建模社区-数学中国
标题:
@FILE和@TEXT：文本文件输入输出 的问题
[打印本页]
作者:
ljwabc115
时间:
2009-9-1 21:50
标题:
@FILE和@TEXT：文本文件输入输出 的问题
本帖最后由 ljwabc115 于 2009-9-1 21:52 编辑
1 T8 q& w: ^7 \5 l C( F: k+ n4 j
9 x# W9 j# }2 v& J
myfile.txt文件
9 f, S$ R8 n. C+ B. g# ~! |$ Y
的内容、格式：
' \6 O8 w& W7 `3 {# K
Seattle,Detroit,Chicago,Denver~
% j3 ?. Z# ]( D d
COST,NEED,SUPPLY,SHIP~
3 @( N/ j. x- D6 j5 ^* X
12,28,15,20~
$ @. n! _4 S, C! B1 R- m2 Y; V% r
1600,1800,1200,1000~
5 ^+ L1 \/ T: q: ]+ Z
1700,1900,1300,1100
. E+ g# d8 r1 r6 z4 u# t% ~" G
, F. p* L- q- X- e$ n8 T# E
! o* t& R9 W7 e* F S# l" M6 X# Q" x8 u
! @! o% h( ]3 ^8 c! o
!lingo文件
% y' i# m. r$ E2 X% H' B4 N/ n
4 j" J3 a# u2 x, m* L
MODEL:
2 I+ v2 x) o5 i. D" }5 E* P) C s
SETS:
6 v+ _# G; l& Y1 S3 i" h" x
MYSET / @FILE(‘myfile.txt’) / : @FILE(‘myfile.txt’);
6 A9 B$ A5 ]) f. Y u
ENDSETS
8 H8 w: k5 ]9 W- ?" e, u: E
MIN = @SUM( MYSET( I):
# B- E) G+ v5 L s1 K% K+ L
SHIP( I) * COST( I));
) j+ e& T! r. g8 O6 r
@FOR( MYSET( I):
9 C) d4 _: K) e! p9 ]2 p/ Z+ f
[CON1] SHIP( I) > NEED( I);
6 A' f( ]* n! V6 U+ P! N1 w2 h
[CON2] SHIP( I) < SUPPLY( I));
& ?9 l/ n6 p. x+ @9 q
DATA:
! | e) @3 ?$ k
COST = @FILE(‘myfile.txt’);
+ _" n' |0 @, u9 @+ t5 S8 R
NEED = @FILE(‘myfile.txt’);
* w* @7 a+ b* y8 n( {1 Y
SUPPLY = @FILE(‘myfile.txt’);
5 V( j! s; M& Z1 \1 J& I$ s
@TEXT(‘result.txt’)=SHIP, @DUAL(SHIP), @DUAL(CON1);
) y8 b# q2 D1 U! }
ENDDATA
) K. F# {/ q& u
END
; |" c3 a6 ?4 R! X- d; n
6 X7 K6 z3 m' ~* [! m3 F
如何调整存盘，才能正确运行？
文本文件输入输出.rar
2009-9-1 21:52 上传
点击文件名下载附件
下载积分: 体力 -2 点
490 Bytes, 下载次数: 2, 下载积分: 体力 -2 点
作者:
数模鸿雁
时间:
2010-9-4 17:56
顶楼主！望楼主把@text函数的用法也弄下
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5
