|
|
[求助]
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![fortran二维数组读入再读出后所有元素都变成0]()
UFV4%17571]GXEU3XF8JY0J.png |
» 本帖附件资源列表
-
欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
- 附件 1 : input.txt
2015-11-09 18:27:14, 145.25 K
» 猜你喜欢
售一区SCI文章T0P,我:8O.551.O54,科目全,可十急
已经有7人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有10人回复
售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急
已经有11人回复
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
已经有6人回复
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
已经有13人回复
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有15人回复
售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急
已经有10人回复
售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急
已经有6人回复
售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急
已经有7人回复
售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急
已经有9人回复
|