24小时热门版块排行榜    

查看: 3033  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 7K1CJE38xLG4 2026-08-25 4/200 2026-08-26 02:04 by cNXvBfCpiZOM
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件,有关系吗? +17 木水思豆 2026-08-25 20/1000 2026-08-26 01:26 by chengyan1220
[基金申请] 今天务委会开完了,明天出结果吗 +18 angus9576 2026-08-25 22/1100 2026-08-26 00:41 by merchancy
[基金申请] 在坚冰还盖着北海的时候,我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 明天应该可查了!? +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[基金申请] 放榜前的不淡定 20+4 snowwithsea 2026-08-19 19/950 2026-08-25 17:57 by chick875
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 2026国自然函评费到账 +20 羊腰板 2026-08-21 23/1150 2026-08-25 16:34 by zsna
[基金申请] 今日不放榜?网传国自然预计 8 月 27 日可查结果 +17 医学老男孩 2026-08-20 22/1100 2026-08-25 15:36 by 医学老男孩
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
[教师之家] 导师吐槽:我怎么摊上了这么个极品研究生! +3 苏东坡二世 2026-08-23 3/150 2026-08-25 10:35 by shisan1313
[基金申请] 我面上完蛋了 +13 且听虎啸 2026-08-20 14/700 2026-08-25 09:10 by mrkang
[基金申请] 范进中举一文的中心思想 +7 炎黄贵胄 2026-08-22 8/400 2026-08-25 08:48 by ZJTJZ
[基金申请] 能否退出参与的面上项目解除限项 +21 koalala 2026-08-24 24/1200 2026-08-24 19:25 by 家与远方
[基金申请] filecode,4个jtjc了 +14 ziyangfang 2026-08-19 17/850 2026-08-24 18:37 by 哈哈蛤?
[基金申请] 让我中一个面上吧! +13 大萍1987 2026-08-20 16/800 2026-08-24 10:23 by 太傻了
[基金申请] 今天放榜吗? +15 布布和一二 2026-08-19 16/800 2026-08-23 09:55 by 张春生
[基金申请] 时间戳又变了 +13 wuchongjun 2026-08-20 19/950 2026-08-21 17:21 by 紫杉醇
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
信息提示
请填处理意见