| 查看: 2007 | 回复: 6 | ||
jingjingdou银虫 (小有名气)
|
[求助]
fortran读写问题
|
求助： fortran中能否实现在一个program中open多个文件，即data1.txt执行完成后，接着自动执行data2.txt文件，以此类推…… 每次的文件结果可否均输入同一个文件如out.txt…… 请高手指点……  |
回复此楼» 猜你喜欢
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有3人回复
-
售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急
已经有4人回复
-
27博士申请
已经有3人回复
-
厉娜
已经有5人回复
-
售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急
已经有12人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有15人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有14人回复
-
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有16人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有15人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有10人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- fortran，带字符的数据读取与存储！
已经有11人回复
- 关于 argc 的值
已经有29人回复
- FORTRAN 读取文件数据出错
已经有6人回复
- 怎么读取Siesta输出的Hamiltonian and overlap矩阵(*.HSX文件)？
已经有16人回复
- 提取Gaussian的rwf文件信息的工具rwfdump简介
已经有13人回复
- 帮忙讲解一下 文件的读取
已经有26人回复
- Fortran如何读取数据避开空行？
已经有7人回复
- FORTRAN 基础知识讲解
已经有21人回复
- fortran两个问题，文件中的空格，屏幕同一行覆盖输出
已经有23人回复
- 写了一个fortran90的小程序，编译通不过，请大侠帮忙
已经有59人回复
- 郁闷了啊，最简单的读写，但是总报错，compaq visual fortran6.5
已经有14人回复
- 【求助】读文本数据出现段错误[fortran]
已经有14人回复
- 【求助】FORTRAN读取文本文件
已经有9人回复
- 【求助】求高手关于Fortran数据读写的问题。【已完结】
已经有12人回复
- 【求助】求助：安装abinit-6.2.3出现错误
已经有12人回复
- 【求助】求助fortran中一个调用文件的问题
已经有3人回复
- 【求助】Fortran 如何读取文件中特定行的内容
已经有16人回复
- 【求助】matlab读取fortran输出的txt文件【已解决】
已经有3人回复
weiwei43
至尊木虫 (正式写手)
- 应助: 16 (小学生)
- 金币: 18316.1
- 红花: 6
- 帖子: 737
- 在线: 94.7小时
- 虫号: 250282
- 注册: 2006-05-13
- 专业: 机械动力学
2楼2012-12-27 15:11:32
jingjingdou
银虫 (小有名气)
- 应助: 5 (幼儿园)
- 金币: 571.5
- 红花: 3
- 帖子: 243
- 在线: 39.7小时
- 虫号: 2189750
- 注册: 2012-12-16
- 性别: MM
- 专业: 结构工程
3楼2012-12-27 16:16:56
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
4楼2012-12-27 16:25:11
jingjingdou
银虫 (小有名气)
- 应助: 5 (幼儿园)
- 金币: 571.5
- 红花: 3
- 帖子: 243
- 在线: 39.7小时
- 虫号: 2189750
- 注册: 2012-12-16
- 性别: MM
- 专业: 结构工程
|
这是我程序的一部分，按照你给我的建议，我将读入文件名设为一个数组，file_input，然后读取这个字符串数组的元素，具体如下，但是运行却出现错误。请帮我看看 部分.for： character*20 file_input data file_input/'d=0.001','d=0.005','d=0.008','d=0.01', & 'd=0.02','d=0.03','d=0.04','d=0.05', & 'd=0.08','d=0.1','d=0.2','d=0.5'/ do i=1,12 write(*,*)file_input(i) open(5,file=file_input(i),status='old') 运行后的错误见图片1：  1.jpg |
5楼2012-12-27 16:57:35
感谢参与，应助指数 +1
|
本帖内容被屏蔽 |
6楼2012-12-27 17:10:32
jingjingdou
银虫 (小有名气)
- 应助: 5 (幼儿园)
- 金币: 571.5
- 红花: 3
- 帖子: 243
- 在线: 39.7小时
- 虫号: 2189750
- 注册: 2012-12-16
- 性别: MM
- 专业: 结构工程
7楼2012-12-27 17:23:23
