顺序结构

控制结构:分支

if (logical_expr) then
    statement 1
    statement 2
end if 

if (逻辑表达式1) then
    语句1
    语句2
    else if (逻辑表达式2) then
        语句1
        语句2
        else
            语句1
            语句2
end if 

控制结构：循环

当循环

do 
    statement
    if (逻辑表达式) exit
    statement
end do 

迭代(计数)循环

do index = istart, iend, incr
    statement1
    statement2
end do 

cycle和exit

cycle：如果cycle语句在do循环体内执行，但钱循环的执行将被终止，控制器返回到循环顶部。循环控制变量将增加，如果控制变量还没有达到其极限，循环的执行将继续。

exit:循环的执行将终止，控制器将转到循环后面的第一条可执行语句处。
==我太难了，用python写的一个计算的小程序跑了一天多还没有弄出来结果，迫于无奈，只好复习几年前学过的Fortran了~==