| 查看: 383 | 回复: 3 | |||
| 当前主题已经存档。 | |||
mmfzx0517木虫 (著名写手)
|
[交流]
【求助】【求助】在循环中，每一次循环获得的数据保存为不同的TXT文档？
|
||
|
在循环中，每一次循环获得的数据如何保存在不同的TXT文档？请高手指教，不甚感谢! 例如： do i=1,n 语句 ........... 输出结果（就是在此处，如何将每一次循环的数据保存在不同的TXT文档？） end do |
回复此楼» 猜你喜欢
0856求调剂
已经有13人回复
-
0703化学
已经有11人回复
-
329求调剂
已经有7人回复
-
321求调剂
已经有8人回复
-
0856材料化工调剂 总分330
已经有12人回复
-
309求调剂
已经有3人回复
-
070300化学354求调剂
已经有4人回复
-
330分求调剂
已经有3人回复
-
299求调剂
已经有8人回复
-
一志愿北京理工大学本科211材料工程294求调剂
已经有6人回复
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
