24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 507  |  回复: 4

wang_2008

木虫 (初入文坛)

[求助] 文件读取 已有1人参与

我有一个数组存在一个dat文件中,例如,
    1           0
    2         0.2
    3         0.4
    4         0.6
    5         0.8
    6         1.0
如果,我只想将它的第二列读取出来,改怎么些程序呢?我做了几次都不对呢?请大家帮帮忙!
OPEN (UNIT=8, FILE = 'ele.dat', STATUS='OLD', ACTION = 'READ', IOSTAT=ierror)
! read nodes
DO i = 1,6
   READ(8,200) info_nodes(i)
END DO
200 FORMAT (5X,F12.1)

谢谢!
回复此楼

» 猜你喜欢

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

wxws.2008

木虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
把read里面的200改为*,然后读取的数加上一列

发自小木虫Android客户端
2楼2015-12-24 17:53:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxws.2008

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★
wang_2008: 金币+5, ★★★★★最佳答案 2015-12-24 23:30:33
DO i = 1,6
? ?READ(8,*)a, info_nodes(i)
END DO

发自小木虫Android客户端
3楼2015-12-24 17:54:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wang_2008

木虫 (初入文坛)

引用回帖:
3楼: Originally posted by wxws.2008 at 2015-12-24 17:54:54
DO i = 1,6
? ?READ(8,*)a, info_nodes(i)
END DO

除此之外,还有别的方法么?
能不能不读入a中?我觉得这样效率比较低,读取还要赋值。
能不能像c++中的语句那样呢?
4楼2015-12-24 22:57:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxws.2008

木虫 (正式写手)

引用回帖:
4楼: Originally posted by wang_2008 at 2015-12-24 22:57:22
除此之外,还有别的方法么?
能不能不读入a中?我觉得这样效率比较低,读取还要赋值。
能不能像c++中的语句那样呢?...

貌似可以,但需要知道文件的格式,特别是空格啥的~

发自小木虫Android客户端
5楼2015-12-24 23:39:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wang_2008 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料考研调剂 +5 Gs大王 2026-04-02 5/250 2026-04-02 07:02 by yjolah
[考研] 英一数一408,总分284,二战真诚求调剂 +12 12.27 2026-03-30 14/700 2026-04-02 00:18 by 欣喜777
[考研] 288求调剂 一志愿哈工大 材料与化工 +28 洛神哥哥 2026-03-31 28/1400 2026-04-01 22:51 by peike
[考研] 311求调剂 +13 zchqwer 2026-04-01 15/750 2026-04-01 22:30 by 2026材料调剂
[考研] 070300化学求调剂 +13 小黄鸭宝 2026-03-30 13/650 2026-04-01 19:31 by 安靖aj
[考研] 【求调剂】085601材料工程专硕 | 总分272 | +10 脚滑的守法公民 2026-03-27 10/500 2026-04-01 17:23 by pies112
[考研] 314求调剂 +4 溪云珂 2026-03-26 4/200 2026-04-01 17:00 by oooqiao
[考研] 086502化学工程342求调剂 +7 阿姨复古不过 2026-03-27 7/350 2026-04-01 16:14 by yanflower7133
[考研] 0703求调剂 +4 zizimo 2026-03-31 4/200 2026-04-01 16:04 by yanflower7133
[考研] 一志愿211,335分,0856,求调剂院校和导师 +11 倾____萧 2026-03-27 12/600 2026-04-01 15:27 by oooqiao
[考研] 324求调剂 +4 想上学求调 2026-04-01 5/250 2026-04-01 14:19 by ZXlzxl0425
[考研] 085600,321分求调剂 +13 大馋小子 2026-03-31 13/650 2026-04-01 12:35 by chemdavid
[考研] 一志愿北京科技大学085601材料工程英一数二初试总分335求调剂 +5 双马尾痞老板2 2026-03-31 5/250 2026-04-01 09:04 by oooqiao
[考研] 求调剂:085600材料与化工,考材科基,总分319 +17 678lucky 2026-03-31 21/1050 2026-04-01 01:40 by 1018329917
[考研] 311(085601)求调剂 +12 liziyeyeye 2026-03-28 13/650 2026-04-01 00:34 by fmesaito
[考研] 求收留 +8 1943443204 2026-03-28 8/400 2026-03-31 15:00 by -迷了路啊路
[考研] 282求调剂 不挑专业 求收留 +4 Yam. 2026-03-30 5/250 2026-03-31 14:41 by 王亮_大连医科大
[考研] 南京大学化学调剂 +11 景随风 2026-03-29 16/800 2026-03-31 10:14 by herarysara
[考研] 调剂 +4 GK72 2026-03-30 4/200 2026-03-30 20:32 by dick_runner
[考研] 341求调剂 +7 青柠檬1 2026-03-26 7/350 2026-03-27 00:19 by wxiongid
信息提示
请填处理意见