24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 483  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

point_light

铁虫 (小有名气)

[求助] 在文本和屏幕不能同时输出,这是为何啊,求指教

我是初学fortran,用的是silverfrost编辑器,最近在挑一个程序,遇到下面小程序类似问题:

比如随便一个简单f95程序:

PROGRAM  CURIE
REAL  X
OPEN(2,FILE='RAND.txt',STATUS='OLD')
X=2.0
WRITE(*,*) X
WRITE(2,1) X
1 FORMAT(F12.8)
CLOSE(2)
END CURIE

屏幕上没有输出结果,
两个2都输出到文本RAND.txt上了,不知道怎么才能在屏幕和文本上分别单独输出。
我研究了下,发现WRITE(*,*) X  这个语句前面打开的是哪个文本, 那么他就在这个文本上接着写,而不是跳出写在屏幕上.

这个问题很严重,我想在比较大的程序中加入一些特殊输出语句,用来观察程序运行的进度,这个问题不解决,很麻烦。
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


jjdg: 金币+1, 感谢参与 2012-05-14 01:26:36
另外,一个建议,不要使用 10 以下的 unit 来关联你的文件,比如你把 2 换成 12 之类的可能更好。

有可能你的编译器中对默认的 unit 不同……
3楼2012-05-13 15:59:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


感谢参与,应助指数 +1
xzhdty: 金币+1, 专家考核, 感谢参与 2012-05-13 15:59:44
这个程序本身没有问题,会在屏幕上输出一个 2.0000000,也会在文本文件中输出结果的。

你如果觉得有问题,请检查你的编译、运行环境等等……
2楼2012-05-13 15:57:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 326求调剂 +8 崽崽仔 2026-04-02 8/400 2026-04-02 23:00 by 无际的草原
[考研] 求调剂 +11 张zz111 2026-03-27 12/600 2026-04-02 22:47 by JourneyLucky
[考研] 071000生物学调剂 +7 知昭蔓 2026-04-02 7/350 2026-04-02 21:47 by dongzh2009
[考研] 330分求调剂 +15 qzenlc 2026-03-29 15/750 2026-04-02 21:41 by 百灵童888
[考研] 学硕机械工程303求调剂 +5 无名所以叫吴明 2026-03-30 5/250 2026-04-02 20:12 by hengsmith
[考研] 一志愿华南师范大学-22408计算机-292分-求华南师范大学调剂 +4 爱读书的小鳄鱼 2026-04-02 4/200 2026-04-02 18:35 by 求调剂zz
[考研] 调剂 +3 好好读书。 2026-04-01 6/300 2026-04-02 15:49 by liumengping
[考研] 材料求调剂 一志愿哈工大总分298分,前三科223分 +12 dongfang59 2026-03-27 12/600 2026-04-02 12:26 by ms629
[考研] 一志愿北京科技大学085601材料工程英一数二初试总分335求调剂 +9 双马尾痞老板2 2026-04-01 9/450 2026-04-02 12:14 by oooqiao
[考研] 0856初试324分求调剂 +6 想上学求调 2026-04-01 6/300 2026-04-02 11:42 by 星空星月
[考研] 08开头看过来!!! +4 wwwwffffff 2026-03-31 6/300 2026-04-02 11:42 by 均值回归
[考研] 考研调剂 +12 Amber00 2026-03-31 12/600 2026-04-02 09:04 by sanrepian
[考研] 建环,能源,土木老师路过看一看!!! +4 嘿嘿uu 2026-04-01 4/200 2026-04-01 20:42 by 无懈可击111
[考研] 332求调剂 +8 Lyy930824@ 2026-03-29 8/400 2026-04-01 18:40 by 千钧澄玉宇啊
[考研] 一志愿西交大080500材料学硕349 +6 jqx1258 2026-03-31 7/350 2026-03-31 21:08 by yuq
[考研] 299求调剂 +8 嗯嗯嗯嗯2 2026-03-27 8/400 2026-03-31 18:23 by lizhi8172
[考研] 一志愿华东师范大学有机化学专业,初试351分,复试被刷求调剂! +9 真名有冰 2026-03-29 10/500 2026-03-31 18:01 by xhai2011
[考研] 一志愿大连理工大学,机械工程学硕,341 +3 西瓜田的守望者 2026-03-30 3/150 2026-03-31 11:08 by asdfzly
[考研] 085600 286分 材料求调剂 +11 麻辣鱿鱼 2026-03-27 12/600 2026-03-30 19:33 by Wang200018
[考研] 332求92调剂 +8 蕉蕉123 2026-03-28 8/400 2026-03-29 10:46 by 周梓丹
信息提示
请填处理意见