| 查看: 1264 | 回复: 3 | |||
| 本帖产生 1 个 程序强帖 ,点击这里进行查看 | |||
[交流]
【求助】从文件读入数组遇到困难
|
|||
|
文件A中第一行有n个数,另一文件B中第一行有m个数。(其中n,m<100) 我要分别将上面的文件读入另一个文件C,我用下面的遇到困难: INTEGER num1(100),num2(100) OPEN (20,FILE="A.txt" ) OPEN (21,FILE="B.txt" ) OPEN (22,FILE="C.txt" ) READ(20,*)(numb1(i),i=1,n) READ(21,*)(numb2(i),i=1,m) WRITE(22,*)(numb(i),i=1,n) WRITE(22,*)(numb(i),i=1,m) END 现在的问题是读入的数据个数如果和数组的大小不等的话,就无法读入。 由于类似文件很多,不要人为的读入n或m的值,如何办? 想过用动态数组,也没能搞定。 INTEGER, allocatable::numb( ; ! 声明动态数组,可以是多维的,类似a(:,:,![]() allocate(numb(50)); ! 给动态数组分配内存 numb(50)=1.0; ! 操作和平常的数组一样 deallocate(numb); 请高手贴出具体的程序解决,诚盼!!!!! [ Last edited by onexf766 on 2010-12-25 at 20:43 ] |
» 猜你喜欢
[复试调剂]西南科技大学国防/材料导师推荐
已经有6人回复
化学工程321分求调剂
已经有12人回复
211本,11408一志愿中科院277分,曾在中科院自动化所实习
已经有4人回复
材料专硕326求调剂
已经有5人回复
东南大学364求调剂
已经有5人回复
国自科面上基金字体
已经有7人回复
药学383 求调剂
已经有4人回复
286求调剂
已经有5人回复
085601求调剂
已经有3人回复
302求调剂
已经有5人回复
» 本主题相关价值贴推荐,对您同样有帮助:
增大数组后执行窗口只是一闪
已经有14人回复
求助:在GUI界面中显示m文件中的数组图片
已经有3人回复
毕赤酵母基因重组时遇到困难了
已经有9人回复
混合基组中,如何读入前一基组的CHK文件?
已经有4人回复
三维数组换行输入到文件(intel fortran 编译器)
已经有6人回复
关于c语言的一个小问题 坐等回复啊 急啊 是关于建立数组的
已经有9人回复
从txt文件读数据到二维数组
已经有4人回复
【求助】关于ansys读入荷载文件
已经有4人回复
【求助】一个求数组绝对值的小问题
已经有7人回复
.txt格式的文件怎么读入Jade5啊?
已经有4人回复
【求助】module里面能够让数组从外部接受一些数据吗?【已完结】
已经有8人回复
【求助】ANSYS定义数组时,如何从TXT文件中导入?
已经有7人回复
» 抢金币啦!回帖就可以得到:
深圳技术大学集成电路与光电芯片学院郝俊杰课题组诚聘博士后、研究助理、访问学生
+2/132
【技术服务】研究所横向技术开发及服务
+1/99
专业技术开发及第三方检测
+1/87
物理学 调剂
+1/84
物理学 调剂
+1/80
福建师范大学招收2026年化学、材料硕士3-4名
+1/78
山东师范大学有机化学专业胡忠燕老师课题组招收2026届硕士研究生以及调剂生
+1/44
天津工业大学航空航天博士招生
+1/35
中科院生态环境研究中心国重实验室招聘客座研究生1-2名
+1/31
纺织科学与工程、材料化工方向招收研究生
+1/28
新疆大学招收学硕调剂
+1/24
北京某研究院生物化学与分子生物学相关专业申请考核制博士招生(春季)
+1/15
中科院上海高等研究院光源科学中心孙天啸团队诚招2位助理研究员
+1/8
课题组招收环境及相关专业调剂硕士研究生(欢迎优秀学生加入)
+1/7
福州大学国家级人才汤育欣教授课题组2026年招收”申请考核制“储能电池方向博士研究生
+1/7
华中科技大学管理学院招聘社会用工(科研助理)1名
+1/7
26年申博自荐-计算机视觉
+1/6
首次招收资格,招收工科调剂!
+1/3
高校招聘
+1/2
五邑大学环境与化学化工学院欢迎化学、化工、材料背景考生报考
+1/1
2楼2010-12-25 22:24:32
3楼2010-12-29 09:31:52
onexf766(金币+6): 非常谢谢!呵呵 2011-04-09 18:01:49
余泽成(程序强帖+1): 2011-04-20 22:43:28
余泽成(程序强帖+1): 2011-04-20 22:43:28
|
这里关键的是下面两行 第一行很容易理解,就是从文件中读入一行,以字符串的形式读入,由于你的一行中全部是数值,所以,我们可以用 Fortran 的内部文件机制解决数据的读取问题。这就是第二行的代码。在第二行中,LINE 不再是一个字符串,而是一个内部文件,这个文件的内容就是前一行读入的那个字符串。END 表示遇到文件尾部时的处理方式,在这里,遇到尾部就跳到标号为 20 的行。由于你问题中说到数据不超过 100,所以我就设了后面读入100个数,比如你的数据是 70 个,当读第 71 个数据时,其实已经是尾部了,因此,就直接跳到标号为 20 的行了…… 大概就是这个样子的…… |
4楼2011-04-09 11:19:27













; ! 声明动态数组,可以是多维的,类似a(:,:,
回复此楼