24小时热门版块排行榜    

查看: 176  |  回复: 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的回帖

skyang

铁杆木虫 (著名写手)

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

具体是什么时候执行哪个语句呢?
踏踏实实做事!
5楼2008-06-23 09:07:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

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的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 能源材料化学课题组招收硕士研究生8-10名 +5 脱颖而出 2026-03-16 15/750 2026-03-21 10:16 by 脱颖而出
[考研] 280求调剂 +7 咕噜晓晓 2026-03-18 8/400 2026-03-21 01:27 by JourneyLucky
[考研] 271材料工程求调剂 +8 .6lL 2026-03-18 8/400 2026-03-21 00:58 by JourneyLucky
[考研] 【考研调剂】化学专业 281分,一志愿四川大学,诚心求调剂 +8 吃吃吃才有意义 2026-03-19 8/400 2026-03-21 00:49 by 刘国森
[考研] 304求调剂 +6 曼殊2266 2026-03-18 6/300 2026-03-21 00:32 by JourneyLucky
[考研] 265求调剂 +12 梁梁校校 2026-03-19 13/650 2026-03-20 21:01 by 无际的草原
[考研] 一志愿华中农业071010,总分320求调剂 +3 困困困困坤坤 2026-03-20 3/150 2026-03-20 20:38 by 学员8dgXkO
[考研] 材料学求调剂 +4 Stella_Yao 2026-03-20 4/200 2026-03-20 20:28 by ms629
[考研] 一志愿 南京航空航天大学大学 ,080500材料科学与工程学硕 +5 @taotao 2026-03-20 5/250 2026-03-20 20:16 by JourneyLucky
[考研] 0703化学调剂 ,六级已过,有科研经历 +13 曦熙兮 2026-03-15 13/650 2026-03-20 19:35 by Dream007008
[考研] 286分人工智能专业请求调剂愿意跨考! +3 lemonzzn 2026-03-17 4/200 2026-03-20 11:04 by lemonzzn
[论文投稿] 申请回稿延期一个月,编辑同意了。但系统上的时间没变,给编辑又写邮件了,没回复 10+3 wangf9518 2026-03-17 4/200 2026-03-19 23:55 by babero
[考研] 本科郑州大学物理学院,一志愿华科070200学硕,346求调剂 +4 我不是一根葱 2026-03-18 4/200 2026-03-19 09:11 by 浮云166
[考研] 收复试调剂生 +4 雨后秋荷 2026-03-18 4/200 2026-03-18 14:16 by elevennnne
[考研] 277调剂 +5 自由煎饼果子 2026-03-16 6/300 2026-03-17 19:26 by 李leezz
[考研] 301求调剂 +4 A_JiXing 2026-03-16 4/200 2026-03-17 17:32 by ruiyingmiao
[考研] 材料工程专硕274一志愿211求调剂 +6 薛云鹏 2026-03-15 6/300 2026-03-17 11:05 by 学员h26Tkc
[考研] [导师推荐]西南科技大学国防/材料导师推荐 +3 尖角小荷 2026-03-16 6/300 2026-03-16 23:21 by 尖角小荷
[考研] 327求调剂 +6 拾光任染 2026-03-15 11/550 2026-03-15 22:47 by 拾光任染
[考研] 0856专硕279求调剂 +5 加油加油!? 2026-03-15 5/250 2026-03-15 11:58 by 2020015
信息提示
请填处理意见