| 查看: 412 | 回复: 3 | |||
| 当前主题已经存档。 | |||
mmfzx0517木虫 (著名写手)
|
[交流]
【求助】【求助】在循环中，每一次循环获得的数据保存为不同的TXT文档？
|
||
|
在循环中，每一次循环获得的数据如何保存在不同的TXT文档？请高手指教，不甚感谢! 例如： do i=1,n 语句 ........... 输出结果（就是在此处，如何将每一次循环的数据保存在不同的TXT文档？） end do |
回复此楼» 猜你喜欢
博士申请
已经有6人回复
-
评审有感
已经有11人回复
-
面上本子正文33页，违规吗？会被低分嘛？
已经有10人回复
-
国自然上会要求
已经有9人回复
-
今年审到国自然15份，谈谈感受
已经有16人回复
-
上海大学实验技术岗位非升即走
已经有8人回复
-
考博自荐
已经有6人回复
-
青C资助名额大幅增加！
已经有16人回复
-
重磅！青年科学基金项目（C类）资助增幅预计超过50%
已经有10人回复
-
我在等一个没有答案的答案
已经有3人回复
grant.tgb
木虫 (小有名气)
- 应助: 1 (幼儿园)
- 金币: 2734.1
- 帖子: 170
- 在线: 41.1小时
- 虫号: 425534
- 注册: 2007-07-27
- 性别: GG
- 专业: 金属材料的力学行为
用TRIM可实现
★ ★ ★ ★ ★ ★ ★ ★ ★
mmfzx0517(金币+5,VIP+0):谢谢你的帮助！ 5-27 11:35
sunxiao(金币+4,VIP+0):谢谢参与，欢迎常来仿真编程版 5-29 01:06
mmfzx0517(金币+5,VIP+0):谢谢你的帮助！ 5-27 11:35
sunxiao(金币+4,VIP+0):谢谢参与，欢迎常来仿真编程版 5-29 01:06
|
write(form,'(i)') i write(filename,*) trim(form),".TXT" open(10,file=filename) write(10,*) ”你想要的输出结果语句" close(10) 把上面的几句放在你的输出结果那里就行了。 这是一个简单的形式，输出的文件是以数字区分的，如果想加字母，则可在write(filename,*) trim(form),".TXT" 这条命令中加。如write(filename,*) “ABCD”, trim(form),".TXT"，那么输出的就是字母开头加数字的文件名了。 哦，对了，在程序开头加一条定义： character(len=20) :: filename,form 呵呵 [ Last edited by grant.tgb on 2009-5-22 at 17:19 ] |
2楼2009-05-22 16:54:29
mmfzx0517
木虫 (著名写手)
- 应助: 5 (幼儿园)
- 金币: 4170.4
- 散金: 51
- 红花: 3
- 帖子: 1146
- 在线: 199.2小时
- 虫号: 507123
- 注册: 2008-02-19
- 专业: 传热传质学
3楼2009-05-27 10:51:11
tjyl
金虫 (正式写手)
- 程序强帖: 2
- 应助: 0 (幼儿园)
- 金币: 3218.1
- 红花: 2
- 帖子: 576
- 在线: 156.6小时
- 虫号: 765184
- 注册: 2009-05-07
- 专业: 生物无机化学
- 管辖: 程序语言
4楼2009-05-28 21:10:55
