24小时热门版块排行榜    

查看: 2943  |  回复: 6

匿名

用户注销 (知名作家)

本帖仅楼主可见

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   同方向广播   申请程序强帖   编辑   删除   查看我的主页

snoopyzhao

至尊木虫 (职业作家)

★ ★ ★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
余泽成(金币+3):谢谢参与应助! 2011-01-05 20:37:28
引用回帖:
Originally posted by mastergxm at 2011-01-04 16:54:37:
我有A.plt与B.plt两个文件,这两个文件都有n行(n很大),FORTRAN程序先创建一个字符串数据组,把A.plt中的每一行以字符串的形式读入此数组,然后再把此数组一行一行地写入到B.plt文件中。结果发现B.plt文件中每一 ...

如果不用 format,每行前面会有一个空格。早期的打印机,可以根据第一格的字符来判断下面的打印行为……具体可以看:

http://www.ibiblio.org/pub/languages/fortran/ch2-14.html

所以,你用下面的写法,就不会有问题了……
CODE:
DO i=1,n
      WRITE(100,'(A)')TRIM(T(i))
ENDDO

2楼2011-01-04 17:25:06
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (知名作家)

本帖仅楼主可见
3楼2011-01-04 18:09:11
已阅   申请程序强帖   编辑   查看我的主页

snoopyzhao

至尊木虫 (职业作家)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
余泽成(金币+1):谢谢参与应助! 2011-01-05 20:37:43
引用回帖:
Originally posted by mastergxm at 2011-01-04 18:09:11:



这种方法果然行呀,高手呀!
很奇妙呀,只加个A,后面又不加数字,如A4,A5之类的,就会起到这个作用。

A 很特殊,它的后面可以不要数字,表示字符串的实际长度。如果有数字,就是给定长度。

找本书,看里面有关格式化输出的部分,呵呵……
4楼2011-01-04 20:27:09
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (知名作家)

本帖仅楼主可见
5楼2011-01-04 21:42:38
已阅   申请程序强帖   编辑   查看我的主页

mypy888

金虫 (正式写手)

高手

又学到东西了
6楼2011-01-09 17:26:59
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
实际上是你的格式化输出的语句写错了,呵呵!
7楼2015-04-13 09:55:49
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 mastergxm 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] E口会评 +11 布布和一二 2026-07-13 13/650 2026-07-15 16:34 by Kittylucky
[基金申请] 小木虫没落了,除了祈祷帖子,几乎看不到有价值的帖子 +12 botar 2026-07-14 12/600 2026-07-15 16:23 by lfgx1314
[基金申请] E口青C会评结束了吗? 40+3 小小书虫c 2026-07-14 9/450 2026-07-15 16:04 by 安静的知了
[基金申请] 会评 +3 无名者登山 2026-07-15 3/150 2026-07-15 14:45 by Vivilian
[基金申请] 生命口C13面上会评时间 +6 luckinging 2026-07-14 9/450 2026-07-15 14:39 by 雨冰共舞
[教师之家] 内心匮乏 +13 水冰月月野兔 2026-07-12 13/650 2026-07-15 14:21 by jiduquegai
[文学芳草园] 你可曾有过这种感受? +3 Jeanya 2026-07-09 6/300 2026-07-15 11:07 by mbtwt
[论文投稿] 农业机械学报投稿周期 +3 G0DLIN 2026-07-14 7/350 2026-07-15 09:26 by xs74101122
[基金申请] 国自然面上D口祈祷 +4 monkeynana 2026-07-14 4/200 2026-07-15 09:14 by 白水煮
[论文投稿] 跨出版社商投稿 20+4 倪好520 2026-07-13 4/200 2026-07-15 08:35 by bobvan
[基金申请] 没收到消息,再次陪跑 +3 天空星辰fly 2026-07-14 3/150 2026-07-14 19:14 by 6543yes
[基金申请] 不要再数国自然申请书的 filecode 的分隔符个数了 +13 sadpencil 2026-07-12 20/1000 2026-07-14 13:12 by 杠就是你对
[基金申请] 明天E口面上会评 +8 布布和一二 2026-07-12 9/450 2026-07-13 22:59 by QTSorange
[论文投稿] MSER送审了还被拒稿 +4 S778950906 2026-07-08 6/300 2026-07-13 16:22 by tfang
[基金申请] 祈祷青基必中 50+6 hadengry 2026-07-09 16/800 2026-07-12 20:31 by 登山虫虫
[考博] 27届辽宁大学应届毕业生申博 +3 可乐微风大海 2026-07-09 3/150 2026-07-10 21:23 by 贪玩的研究僧
[基金申请] 关于如何从代码看上不上会 +17 且听虎啸 2026-07-09 23/1150 2026-07-10 19:51 by sdfapple719
[有机交流] chemdraw 20+5 ?慕鱼? 2026-07-08 6/300 2026-07-10 15:37 by 紫枫星域
[考研] 在职考研 +6 wu5d 2026-07-08 7/350 2026-07-09 16:40 by 化工小霸王呀
[基金申请] 化学口会评?应用基础研究和基础研究,希望能分开 +3 Tide man 2026-07-08 3/150 2026-07-09 11:36 by dede5556
信息提示
请填处理意见