24小时热门版块排行榜    

Znn3bq.jpeg
查看: 169  |  回复: 4
当前主题已经存档。
【悬赏金币】回答本帖问题,作者goalry将赠送您 3 个金币
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

goalry

金虫 (正式写手)

[求助] 【标题】fortran编程【有效期至2800年6月23日】

请教个问题:

1. 在fortran里怎么实现循环语句里的文件写入?

因为我有时候要在每次循环里重新开文件,写入数据,有时候循环的次数数量较大,不能一一的先open。

2. 在fortran里,把数字转化成字符串的函数名称是什么?

» 猜你喜欢

君子以自强不息,厚德载物
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bybbs

★ ★
goalry(金币+2,VIP+0):OK
http://blog.chinaunix.net/u1/46984/showart_418446.html

fortran 数字与字符的转换

program convertSN
!可以借助fortran的内部文件来实现,核心概念是把字符串看作"文件"
integer::num
character*20::str1,str2,str3
num=11
str1='11'
str2='22'
str3='33'

!1,数字转字符
write(str1,"(i4.4)"num   ! 如有需要,不足四位前面补零  
print*,str1

!2,字符转数字
read(str1,"(i2)"num
print*,str1

!3,字符转字符(字符串连接...)
write(str1,"(a8)"trim(str1)//trim(str2)//trim(str3)//'eg' !两个斜杆//连接不同的字符串

!还有一种办法可以实现字符串连接
str1(3:4)=str2
str1(5:6)=str3
str1(7:8)='eg'
print*,str1
end


关于1楼里说的 是不是就是每个循环都要打开一个文件名
比如 data_循环次数(或者当前时间).txt
这种类型的??
我觉得这个完全看你想怎么处理数据了 如果你觉得存成不同文件好用 那貌似还真是没别的办法。。。
4楼2008-06-23 16:21:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

addila

木虫 (正式写手)

那就把数据先保存到数组后者保持文件一直open吧

具体不是很清楚了

能讲清楚点吗
2楼2008-06-23 09:40:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

goalry

金虫 (正式写手)

引用回帖:
Originally posted by addila at 2008-6-23 09:40:
那就把数据先保存到数组后者保持文件一直open吧

具体不是很清楚了

能讲清楚点吗

不是一直open,因为每次循环写入的数据都不在一个文件下边。

就是每次循环都打开一个新的文件供数据写入
君子以自强不息,厚德载物
3楼2008-06-23 09:52:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhanglizhi

银虫 (正式写手)

不懂 但是祝愿————————————————
5楼2008-06-23 17:49:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 344 材料专业 求调剂211 无地域要求 +6 hualkop 2026-04-11 6/300 2026-04-12 15:00 by seattle40
[考研] 本科南方医科大学 一志愿985 药学学硕284分 求调剂 +5 弱水听文 2026-04-09 5/250 2026-04-12 13:16 by shengxi123
[考研] 279求调剂 +8 张番茄不炒蛋 2026-04-11 8/400 2026-04-12 12:28 by wp06
[考研] 290求调剂 +13 柯淮然 2026-04-12 15/750 2026-04-12 12:26 by laoshidan
[考研] 电气专硕320求调剂 +6 小麻子111 2026-04-10 6/300 2026-04-12 10:54 by lemon6009
[考研] 280求调剂 +13 wzzz王 2026-04-09 13/650 2026-04-12 00:31 by 勇攀高峰0126
[考研] 331求调剂 +5 王国帅 2026-04-11 5/250 2026-04-11 22:56 by 溪涧流水
[考研] 296求调剂 +8 汪!?! 2026-04-09 8/400 2026-04-11 21:02 by 逆水乘风
[考研] 085501机械专硕 302分 不挑专业求调剂 +7 汪某. 2026-04-09 7/350 2026-04-11 14:37 by luhong1990
[考研] 296求调剂 +6 汪!?! 2026-04-09 6/300 2026-04-11 11:25 by zhq0425
[考研] 301求调剂 +5 149. 2026-04-10 5/250 2026-04-10 15:45 by 柴小白
[考研] 一志愿中科大070300化学,314分求调剂 +12 wakeluofu 2026-04-09 12/600 2026-04-10 09:57 by liuhuiying09
[考研] 材料化工总分334求调剂 +16 Riot2025 2026-04-08 17/850 2026-04-09 20:19 by maddjdld
[考研] 274求调剂 +5 山阿蔓 2026-04-07 5/250 2026-04-09 15:28 by 18828373951
[考研] 085801 总分275 本科新能源 求调剂 +8 bradoner 2026-04-08 9/450 2026-04-09 13:43 by only周
[考研] 材料专硕322 +14 哈哈哈吼吼吼哈 2026-04-05 14/700 2026-04-09 13:25 by 5268321
[考研] 一志愿吉大化学327求调剂 +12 王王白石 2026-04-06 13/650 2026-04-08 16:05 by luoyongfeng
[考研] 材料调剂 +13 汉123456 2026-04-07 14/700 2026-04-07 22:53 by 来看流星雨10
[考研] 081200-11408-367学硕求调剂 +4 1_2_3111 2026-04-06 4/200 2026-04-07 08:13 by jp9609
[考研] 307求调剂 +3 所念及所望 2026-04-06 3/150 2026-04-06 17:30 by 土木硕士招生
信息提示
请填处理意见