24小时热门版块排行榜

返回列表

kaokaokao789

铁杆木虫 (正式写手)

应助: 0 (幼儿园)
金币: 5106.7
散金: 28
红花: 6
帖子: 941
在线: 119.4小时
虫号: 3322701
注册: 2014-07-14
性别: MM
专业: 数论

[求助] fortran从txt文件中读入数据的问题已有1人参与

求助,我现在有一个txt文件,里面放着我编程要用的数据，怎么样读取数据并对第三列的数据求和！感激不尽啊！

回复此楼

» 本帖附件资源列表

欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com
附件 1 : o50.dat

2015-04-21 21:44:38, 50 M

» 猜你喜欢

对氯苯硼酸纯化已经有3人回复
求助:我三月中下旬出站，青基依托单位怎么办？已经有12人回复
不自信的我已经有12人回复
假如你的研究生提出不合理要求已经有5人回复
所感已经有4人回复
论文终于录用啦！满足毕业条件了已经有28人回复
要不要辞职读博？已经有7人回复
北核录用已经有3人回复
实验室接单子已经有3人回复
磺酰氟产物，毕不了业了！已经有8人回复

» 本主题相关价值贴推荐，对您同样有帮助:

在Fortran程序中，自定义打印数据列数的三种方法已经有8人回复
菜鸟求助关于Fortran运算结束后怎么将结果输出保存为dat文件已经有4人回复
急：求用Fortran或者其他语言编写一个程序，处理下面的数据！！！！！！！！！！已经有37人回复
Fortran如何读取不确定行数的数据已经有3人回复
关于matlab数据写入txt文件的求助（上次发在计算模拟版，好像发的版不对，重发）已经有5人回复
菜鸟求助fortran数组声明及子程序的一些问题啊已经有4人回复
fortran 怎么按行读取数据（有小例子）已经有21人回复
用fortran怎么读.CSV文件已经有11人回复
ansys结果数据导出为txt文件，文件大小有限制吗已经有8人回复
fortran 权威指南英文版以及fortran的教学ppt 已经有235人回复
fortran程序在SSH计算中心上运行的问题！已经有13人回复
fortran real(kind=16) 已经有10人回复
求助！fortran编程实现从txt中一一对应读入数据已经有6人回复
FORTRAN中如何实现重复读取一行？已经有24人回复
fortran中如何处理字符和数据混合的文件已经有6人回复
Fortran数据读入格式的修改已经有5人回复
【求助】Fortran 如何读取文件中特定行的内容已经有16人回复
【求助】matlab读取fortran输出的txt文件【已解决】已经有3人回复

howmuch

1楼 2015-04-21 21:46:17

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

应助: 413 (硕士)
贵宾: 0.002
金币: 7116.5
散金: 15
红花: 63
帖子: 1639
在线: 798.9小时
虫号: 2469437
注册: 2013-05-14
专业: 计算数学与科学工程计算

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与，应助指数 +1
kaokaokao789: 金币+10, ★★★很有帮助, ZAN 2015-07-16 16:14:46
ben_ladeng: 金币+2, 辛苦了 2015-07-17 08:10:05

结果是
  i=    1048576  xx= 780331059.926095

程序如下

! flag
subroutine TestRead3
  implicit none
  real*8 :: x1,x2,x3,xx
  integer :: i
  open(20,file='o50.dat',status='old')
  xx=0d0
  i=0
  do
   read(20,*,end=8341) x1,x2,x3
   i=i+1
   xx=xx+x3
  end do
8341 continue
  close(20)
  print*,' i=',i,' xx=',xx
  stop

end subroutine TestRead3

赞一下