爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 10116|回复: 0

[求助] 文件读取有问题,请大神帮忙看一下,急求!

[复制链接]

新浪微博达人勋

发表于 2018-4-24 11:32:05 | 显示全部楼层 |阅读模式
2金钱
我fortran读文件老是出错,想知道是不是我读取的文本文件有问题,因为文本文件里的数据是我自己写的,可能有问题,麻烦大神帮我看一下,谢谢!!程序应该没有问题,附件里是我的文本文件。
program main
implicit  none
real sta(72),wd(72),jd(72),rain(72,35)
integer i,j
open(1,file='d:\biye\rain35.txt')
read(1,*)
do i=1,72
read(1,*) sta(i),wd(i),jd(i),(rain(i,j),j=1,35)
end do
write(*,*)((rain(i,j),i=1,72),j=1,35)
end

2345截图20180424112952.png

rain35.txt

11.23 KB, 下载次数: 0, 下载积分: 金钱 -5

密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表