24小时热门版块排行榜    

查看: 242  |  回复: 5
当前主题已经存档。

skyang

铁杆木虫 (著名写手)

[交流] 有谁知道古老的FORTRAN语言?有几个语句请教!【有效期至2008年6月23日】

1、FORMAT(F9.2,4F9.4)输出格式应该是什么?
2、  N=5
     WRITE(N,44)    X(1)
        其中的N代表什么意思?
3、IF(ISO.GT.0) GOTO 12  其中的.GT.是什么意思来着?
4、IF(D-1.E-10) 42,42,45   这个语句什么意思啊?其中的42,45都是语句行号。
非常感谢!

[ Last edited by skyang on 2008-6-23 at 13:26 ]
踏踏实实做事!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

addila

木虫 (正式写手)

★ ★
skyang(金币+2,VIP+0):thanks
第一个输出: f9.2格式的数字,和4个f9.4格式的数字

2,n代表第n行的格式吧

3. 那是大于号

4. 是不是执行42两次,45一次?
2楼2008-06-23 08:18:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lianghust

铁杆木虫 (正式写手)

★
skyang(金币+1,VIP+0):thanks
1:F9.2 --使用9个字符宽输出浮点数,其中小数部分占3位;4F9.4中F前面的4是连续输出四个浮点数。
2:write(N,44):N表示输出位置。
3:.GT.: >

[ Last edited by lianghust on 2008-6-23 at 08:21 ]
3楼2008-06-23 08:20:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hxfciae

木虫 (小有名气)

★ ★
skyang(金币+2,VIP+0):thanks
这都是Fortran77中的语法。
1、FORMAT(F9.2,4F9.4)输出格式是输出9个字符宽输出浮点数,其中小数部分占3位(小数点占一位);然后连续输出4个浮点数(9个字符宽的浮点数,小数部分占5位)。?
2、  N=5
     WRITE(N,44)    X(1)
        其中的N代表输出位置,对于一般计算机而言N=5代表输出到屏幕;
3、IF(ISO.GT.0) GOTO 12  其中的.GT.代表great than,大于
4、IF(D-1.E-10) 42,42,45   代表判断语句的不同取值所对应的执行语句。
4楼2008-06-23 08:40:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

skyang

铁杆木虫 (著名写手)

4、IF(D-1.E-10) 42,42,45   代表判断语句的不同取值所对应的执行语句。

具体是什么时候执行哪个语句呢?
踏踏实实做事!
5楼2008-06-23 09:07:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 skyang 的主题更新
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 ELBZ6WwEaRj6 2026-11-04 9/450 2026-11-06 02:15 by qL1cU46YIdK0
[硕博家园] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 ELBZ6WwEaRj6 2026-11-04 11/550 2026-11-06 02:13 by qL1cU46YIdK0
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 ttH3f1oA6ace 2026-11-04 7/350 2026-11-06 02:13 by qL1cU46YIdK0
[考研] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 02:04 by qL1cU46YIdK0
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 ttH3f1oA6ace 2026-11-04 8/400 2026-11-06 02:02 by qL1cU46YIdK0
[公派出国] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +4 ttH3f1oA6ace 2026-11-04 9/450 2026-11-06 02:02 by qL1cU46YIdK0
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +6 ncTVBM6AOJHF 2026-11-04 10/500 2026-11-06 01:51 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 15/750 2026-11-06 01:51 by qL1cU46YIdK0
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 kvewwGtKktqB 2026-11-04 10/500 2026-11-06 01:51 by qL1cU46YIdK0
[考研] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-06 01:40 by qL1cU46YIdK0
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +5 ncTVBM6AOJHF 2026-11-04 10/500 2026-11-06 01:40 by qL1cU46YIdK0
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +6 ncTVBM6AOJHF 2026-11-04 10/500 2026-11-06 01:31 by qL1cU46YIdK0
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 ncTVBM6AOJHF 2026-11-04 14/700 2026-11-06 01:29 by qL1cU46YIdK0
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 ncTVBM6AOJHF 2026-11-04 11/550 2026-11-06 01:29 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +5 ncTVBM6AOJHF 2026-11-04 11/550 2026-11-06 01:20 by qL1cU46YIdK0
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 ELBZ6WwEaRj6 2026-11-04 9/450 2026-11-05 23:17 by qL1cU46YIdK0
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +5 ncTVBM6AOJHF 2026-11-04 13/650 2026-11-05 22:44 by qL1cU46YIdK0
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +6 ncTVBM6AOJHF 2026-11-04 15/750 2026-11-05 22:44 by qL1cU46YIdK0
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-05 11:10 by PYZmcHr5kSaq
[基金申请] 各位基础老师们,看完中央《从严治党》的决定后,对学术界更加有信心了吧 +5 iaeyuan 2026-11-01 5/250 2026-11-04 14:43 by jinchengzi
信息提示
请填处理意见