爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 2185|回复: 1

[求助] 用fortran读取一个文本文件 出错

[复制链接]

新浪微博达人勋

发表于 2014-7-3 21:32:01 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
本帖最后由 云大小子 于 2014-7-3 21:34 编辑

integer ::i

character a*26,b*10
open (11,file='2012.01sf.txt',form='formatted')

do i=1,2
read(11,'(a26)')a
print*,a
enddo

   read(11,500) b,(var(i),i=1,31)

   500 format(a10,31(i3))
  print*,b
enddo
  end

这个脚本很简单:但是运行读取这个txt数据的时候提示: input conversion error,unit 11,
望大家不吝赐教,给予指点迷津,多谢多谢!!!!
后面附带了测试的txt数据,该数据的格式很奇怪,其中第三行开始的数据 0-10   平均之间的空白很宽,如果定义字符串长度还不好确定。


2012.01sf.txt

4.3 KB, 下载次数: 4, 下载积分: 金钱 -5

密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-7-3 22:01:05 | 显示全部楼层
报错很简单,类型不符,原因自己百度下吧
简单修改了一下程序,试试看喽
integer ::i
character a*26,b*10,c*10
open (11,file='2012.01sf.txt',form='formatted')
do i=1,2
read(11,'(a26)')a
enddo
这里少了一个do循环,自己补上哈
   read(11,*) b,c,(var(i),i=1,31)
enddo
  end
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

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

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

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