Fortran Coder

查看: 7540|回复: 4
打印 上一主题 下一主题

[流程控制] 求大神赐教IF语句

[复制链接]

8

帖子

4

主题

0

精华

入门

F 币
39 元
贡献
25 点
跳转到指定楼层
楼主
发表于 2014-6-10 16:08:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请问大家知不知道这段语句中的IF语句后面的500,510,510是什么意思啊?我是新手,查资料没有找到!

[Fortran] 纯文本查看 复制代码
IF(KU-KL)500,510,510
510 K=N
DO 520 KK=KL,KU
K=K-1
520 V(K,IP)=V(K,IP)-A(KK)*V(N,IP)
500 N=N-1


分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

712

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
607 元
贡献
311 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

沙发
发表于 2014-6-10 16:52:59 | 只看该作者
等效于
[Fortran] 纯文本查看 复制代码
if ( KU- KL ) <0 then goto 500
if ( KU- KL ) ==0 then goto 510
if ( KU- KL ) >0 then goto 510

38

帖子

7

主题

0

精华

熟手

F 币
218 元
贡献
134 点

规矩勋章

板凳
发表于 2014-6-10 19:04:53 | 只看该作者
又是老代码吧,我看95里面是没有这个啊

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
地板
发表于 2014-6-10 20:02:40 | 只看该作者
麦田守望者 发表于 2014-6-10 19:04
又是老代码吧,我看95里面是没有这个啊

老语法,建议新代码不要这样写.

8

帖子

4

主题

0

精华

入门

F 币
39 元
贡献
25 点
5#
 楼主| 发表于 2014-6-11 09:19:30 | 只看该作者

谢谢!我就是在新的书里面没有看到过,但是我看一个程序里面有这个语句,所以就不懂了!
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-9 03:41

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表