六、分支结构:条件判断语句

返回首页

简单的逻辑条件语句

单句if语句,示例:

if (x==16) print*, 'x=16'

注意单句if语句在if后面只能接一个执行语句

基本if-then-else语句

要想if判断后能对应执行多条语句,需采用这种语句,如下:

if (x==16) then print*, 'x=16' print*, 'good job.' else print*, 'x is not equal to 16' print*, 'try again.' end if

其中else部分可以省略(即第4-6行)。

多路选择的if-then-else语句

要想if判断失败后继续进行别的判断,可以使用这种语句,如下:

if (x==16) then print*, 'x=16' print*, 'good job.' else if (x==-16) then print*, 'x=-16' print*, 'is ok.' else if (x==0) then print*, 'x=0' print*, 'well.' else print*, 'try again.' end if

case语句

也可以根据某一变量对应的不同情况直接进行分类,即使用case语句如下:

select case (x) case(1) print*, 'one.' case(2) print*, 'two.' case default print*, 'no.' end if

注意在选择表达式中(即x)的变量需要提前声明才可以正常编译。