Fortran学习笔记目录

书接上回：Fortran学习笔记：01 基本格式与变量声明

流控制语句

IF语句

IF (逻辑表达式) THEN
...
ELSE
...
END IF

SELECT-CASE语句

类似于C类语言中的switch-case语句

select case(变量)
case(数值1)
...
case(数值2)
...
case(数值n)
...
case default
...
end select

例：

program main
    implicit none
    integer :: i=1
    select case(i)
    case(1)
write(*,*) "1111"
    case(2)
write(*,*) "2222"
    case(3)
write(*,*) "3333"
    case default
write(*,*) "0"
    end select
end

GOTO语句

跳转至任意行，可读性差，不建议使用

DO语句

program main
    implicit none
    integer :: counter
    do counter=1,10,1
        write(*,*) counter
    end do
end

counter由1到10，增量为1

DO-WHILE语句

program main
    implicit none
    integer :: counter=1
    do while(counter<=10)
        write(*,*) counter
        counter=counter+1
    end do
end

循环控制

Fortran语言中的CYCLE语句可以跳过接下来的语句，跳转至循环开头，类似于C类语言中，continue语句的功能。

EXIT可以直接跳出当前循环，类似于C类语言中的break语句