fortran中的SELECT CASE 语法_压力山大求拯救de木

个人资料

微博

正文字体大小：大中小

fortran中的SELECT CASE 语法

(2013-03-20 14:14:08)

分类：吃饭的工具

详细语法介绍如下：

select case(变量) ←放入所要判断的变量

case(数值1)

…… ←变量等于数值1时，执行此程序段

case(数值2)

…… ←变量等于数值2时，执行此程序段

……

case(数值n)

…… ←变量等于数值n时，执行此程序段

case default

…… ←变量不等于任何数值时，执行此程序段

end select

CASE DEFAULT程序模块并没有规定一定要出现。在CASE里的冒号前后放入两个数值时，代表在这两个数字范围中的所有数值。CASE括号里还可以用逗号来放入多个变量。

case(1) !变量=1时，会执行这个case中的程序模块

case(1:5) !1<=变量<=5时，会执行这个case中的程序模块

case(1: ) !1<=变量时，会执行这个case中的程序模块

case( :5) !变量<=5时，会执行这个case中的程序模块

case(1,3,5) !变量等于1或3或5时，会执行这个case中的程序模块

使用SELECT CASE来取代某些使用IF-ELSE IF的多重语句，会让程序代码看起来比较简洁。不过使用SELECT CASE有一些限制：

（1）只能使用整数（INTEGER），字符（CHARACTER），及逻辑变量（LOGICAL），不能使用浮点数及复数。

（2）每个CASE中所使用的数值必须是固定的常量，不能使用变量。

使用浮点数，不能用SELECT-CASE来做多重判断，只能使用IF-ELSE IF的做法。另外一个限制就是每个CASE里面的数值必须是常量。

阅读┊ 收藏 ┊ 喜欢 ▼ ┊打印┊举报/Report