24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

atachengqi

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 473.5
散金: 20
帖子: 10
在线: 4.3小时
虫号: 3735094
注册: 2015-03-13
专业: 大气遥感和大气探测

[求助] fortran连续读取文件，文件名的问题已有2人参与

从模型计算得出一系列的文件，（例如CC_001,CC_002.......CC_079)
如果要编写语言来依次读取这些文件，文件名这个问题应该怎么解决？（主要是前面那个0啊，一个一个都去掉0也不太现实）

谢谢各位大神了！！！

回复此楼

» 猜你喜欢

天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入已经有4人回复
康复大学泰山学者周祺惠团队招收博士研究生已经有6人回复
AI论文写作工具：是科研加速器还是学术作弊器？已经有3人回复
孩子确诊有中度注意力缺陷已经有6人回复
2026博士申请-功能高分子，水凝胶方向已经有6人回复
论文投稿，期刊推荐已经有4人回复
硕士和导师闹得不愉快已经有13人回复
请问2026国家基金面上项目会启动申2停1吗已经有5人回复
同一篇文章，用不同账号投稿对编辑决定是否送审有没有影响？已经有3人回复
RSC ADV状态问题已经有4人回复

1楼2016-03-12 14:50:09

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

slx345335197

新虫 (初入文坛)

应助: 1 (幼儿园)
金币: 195
帖子: 7
在线: 3.8小时
虫号: 3075129
注册: 2014-03-20

【答案】应助回帖

感谢参与，应助指数 +1

N=51
N1=MOD(N,100)
N2=MOD(N,10)
N3=MOD(N,1)

DO I=1,99
OPEN(unit=11,file='CC_'//N1//N2//N3)
CLOSE(11)
END DO

赞一下(1人)

回复此楼

4楼2016-03-12 22:20:03

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

slx345335197

新虫 (初入文坛)

应助: 1 (幼儿园)
金币: 195
帖子: 7
在线: 3.8小时
虫号: 3075129
注册: 2014-03-20

引用回帖:

4楼: Originally posted by slx345335197 at 2016-03-12 22:20:03
N=51
N1=MOD(N,100)
N2=MOD(N,10)
N3=MOD(N,1)

DO I=1,99
OPEN(unit=11,file='CC_'//N1//N2//N3)
CLOSE(11)
END DO

我忘了加后缀。。。

OPEN(11,file='CC_'//N1//N2//N3//'.TXT')

赞一下(1人)

回复此楼

5楼2016-03-12 22:21:16

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

相关版块跳转我要订阅楼主 atachengqi 的主题更新

返回列表