| 查看: 2171 | 回复: 1 | ||
[求助]
fortran直接读取文件已有1人参与
|
|
求助各位大神，有一个文本文件，我想循环读取文件，比如要从2到5行，12到15行的数据，以此类推 发自小木虫Android客户端 |
回复此楼» 猜你喜欢
三甲基碘化亚砜的氧化反应
已经有4人回复
-
请问下大家为什么这个铃木偶联几乎不反应呢
已经有5人回复
-
请问有评职称，把科研教学业绩算分排序的高校吗
已经有5人回复
-
孩子确诊有中度注意力缺陷
已经有12人回复
-
2025冷门绝学什么时候出结果
已经有3人回复
-
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有4人回复
-
康复大学泰山学者周祺惠团队招收博士研究生
已经有6人回复
-
AI论文写作工具：是科研加速器还是学术作弊器？
已经有3人回复
-
论文投稿，期刊推荐
已经有4人回复
-
硕士和导师闹得不愉快
已经有13人回复
【答案】应助回帖
★
感谢参与，应助指数 +1
xzhdty: 金币+1, 感谢参与 2017-07-05 12:47:16
感谢参与，应助指数 +1
xzhdty: 金币+1, 感谢参与 2017-07-05 12:47:16
|
INTEGER,PARAMETER :: SkipLine ! how many lines you want to skip, in your case SkipLine = 12-2 = 10 INTEGER :: Line1 ! in your case Line1 = 2 INTEGER :: MaxLine ! how many lines in your file DO i = Line1 : MaxLine : SkipLine DO j = i : ReadNLine READ(UNIT,*) A(j) ENDDO ENDDO �?似的做法應該就可以了吧 |
2楼2017-07-04 20:14:51