Fortran-95-程序设计-第四章.pptx

中山大学环境科学与工程学院

陆希;DO

DOWHILE

DO循环的嵌套

隐含DO循环

循环的流程控制;DO;;下面的DO语句都是合法的：;DO语句的一些特点是：

1、当循环变量的增量(步长值)为1时增量式可不写。

2、循环变量初值、终值和步长可以分别是常数、变量或表达式。如果是变量则它应预先被赋值。如果是表达式，则先计算出表达式的值。循环次数可以从循环初值、终值和步长计算出来：次数＝INT((终值－初值＋增量)/增量)。如果计算出的循环次数＜0时，则按0处理，即一次也不执行循环。

3、循环变量的初值、终值和步长可以为正或负。初值、终值可以为零。但步长不应为0，否则循环变量的值永远不会超过终值，从而陷入死循环。

4、如果循环变量的类型和初值、终值和步长的类型不一致，则按赋值的规则处理，即需先将初值、终值和步长的类型转化成循环变量的类型，然后进行处理。为避免错误，应尽量使循环变量类型与初值、终值和步长的类型一致。

5、由于实型数在运算和存储时有一些误差，因而循环次数的理论值与实际值之间会有一些差别。这种情况在程序设计中常有发生，而且比较隐蔽不易发现。所以应该避免使用实型的循环变量，用整型循环变量计算出的循环次数是绝对准确的。;DO循环执行步骤：;循环终端语句：;练习1用展开式;;程序是否正确？运行结果？有无多余动作？（比较两个程序）;DOWHILE;;;;循环的嵌套;例：求两个整数的最大公约数;例：打印“九九表”，即1×1=11×2=2……

直到9×9=81;隐DO循环;CYCLE命令;EXIT命令（p109）;其它：;DO循环规则;3、可以用转移语句从循环体内转到循环体外，也可以在循环体内转移，但不允许从循环外转到循环内。(块规则)

例：下面写法是合法的(尽管不符合结构化原则)：

例：以下写法非法：;4、多个DO循环可以共享一条循环终端语句，但循环体必须完全包含在外围DO循环体内。

5、如果DO循环出现在if，elseif或else块内，则DO循环范围必须完全包含在该块中。

6、如果IF语句和SELECTCASE语句出现在DO循环范围内，则相应的ENDIF语句和ENDSELECT语句也必须出现在这个DO循环体内。;练习：求级数;例：对一个大于???等于3的正整数，判断它是不是一个素数。