| 查看: 521 | 回复: 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
» 猜你喜欢
之前让一硕士生水了7个发明专利，现在这7个获批发明专利的维护费可从哪儿支出哈？
已经有9人回复
-
心脉受损
已经有6人回复
-
博士申请都是内定的吗？
已经有8人回复
-
博士读完未来一定会好吗
已经有32人回复
-
读博
已经有5人回复
-
投稿精细化工
已经有4人回复
-
高职单位投计算机相关的北核或SCI四区期刊推荐，求支招！
已经有4人回复
-
导师想让我从独立一作变成了共一第一
已经有9人回复
-
Springer期刊投稿求助
已经有4人回复
3楼2015-11-09 19:47:40
2楼2015-11-09 18:55:34