Fortran学习笔记4（循环语句）

Fortran学习笔记4

逻辑运算

if命令需要和逻辑运算表达式搭配才能起到很好的效果。下面分别列出Fortran90和Fortran77的逻辑运算符。

Fortran90	Fortran77	符号描述
==	.EQ.	判断两个表达式是否相等
/=	.NE.	判断两个表达式是否不相等
>	.GT.	判断是否大于
>=	.GE.	判断是否大于或等于
<	.LT.	判断是否小于
<=	.LE.	判断是否小于或等于

集合运算符

符号	符号说明
.AND.	交集，两边表达式都为真时为真（二元运算符）
.OR.	并集，有一个表达式为假则为假（二元运算符）
.NOT.	取非，真值于后面表达式相反（单目运算符）
.EQV.	相等，两边逻辑运算结果相同时为真（二元运算符）
.NEQV.	不相等，两边逻辑运算结果不同时为真（二元运算符）

逻辑运算符的优先级高于集合运算符。

---

循环

循环的主要功能是精简代码！！！有两种格式，一种是固定循环n次，另一种是满足条件时循环。主要有两条语句，Do语句和Do-While语句。

请注意，循环并不一定要用循环语句才能实现。循环是一种将线状程序浓缩块状化的思想。是一种编程思想！！！！不是语句或者其他。

Do语句

语法如下：

do counter=initial,endnumber,increment
    ...       !  counter计数器，从初始值开始，每循环一次加增量大小.
    ...       !  endnumber计数器的终止，当计数器大于终止数时，循环停止
    ...       ! increment  增量数，每次循环，给计数器加一个增量数
end do

在Fortran77中，会用行号来封装循环。

do   100   counter=initial,endnumber,increment
    ...       !  counter计数器，从初始值开始，每循环一次加增量大小.
    ...       !  endnumber计数器的终止，当计数器大于终止数时，循环停止
    ...       ! increment  增量数，每次循环，给计数器加一个增量数
100    continue

do循环可以嵌套。

do i=1,n
    do j=1,n
        do k=1,n
            ...
        end do
    end do
end do

Do-While循环

语法如下：

do while(rep)
    ......  !   档rep为真时，一直执行循环体。
    ...