| 查看: 650 | 回复: 2 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
fortran二维数组读入再读出后所有元素都变成0
|
||
|
各位大侠，小的系初学者，被一个问题困扰了一天了。将一个二维数组（5179*4）读入后再读出，但是读出后的数组元素全变成了0，代码和文件如下，向各位诚心赐教，不胜感激！ program no_1 implicit none integer i,j integer,parameter::maxnod=5179 real a(maxnod,4),b(maxnod,4) open(1,file="input.txt"  open(2,file="output.txt" read(1,*)((a(i,j),j=1,4),i=1,maxnod) write(2,"(4f10.2)" ((b(i,j),j=1,4),i=1,maxnod)write(*,"(4f10.2)" ((b(i,j),j=1,4),i=1,maxnod)stop end  UFV4%17571]GXEU3XF8JY0J.png |
回复此楼» 本帖附件资源列表
-
欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com - 附件 1 : input.txt
2015-11-09 18:27:14, 145.25 K
» 猜你喜欢
售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急
已经有5人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有5人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急
已经有5人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有4人回复
-
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有4人回复
-
售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急
已经有5人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有5人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有6人回复
-
延安大学回应“副教授留绝笔信”：确已离世，正核实举报内容
已经有5人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有23人回复
3楼2015-11-09 19:47:40
2楼2015-11-09 18:55:34
