Fortran程序设计(第六章_循环结构(下.pptVIP

第六章 循环结构（下）; 一个DO结构循环体内可以包含另一个DO循环结构，这就是DO结构循环嵌套。 注意： 1 内循环必须完全嵌套在外循环体内，不能相互交叉。 2 循环嵌套中各层的循环控制变量不能同名。 ;嵌套DO结构的执行过程; 4．对于内层DO结构的执行过程与外层结构的一样；若Rj0，顺次执行内循环的各语句；当Rj0时，从“正常出口”退出内循环。 5．继续执行内循环DO结构后面的外循环体内的其它语句。 6．外层DO结构循环变量加一个步长，循环次数Ri减1。 7．重复2-6步的算法，直到RI等于0，结束全部循环。;嵌套DO结构的有关规定： 1.各种DO结构都可以嵌套，但必须完整嵌套。 2.对于带循环变量的DO结构，并列的DO结构可以用同一个变量名作循环变量，而嵌套的DO循环结构则不能使用相同的循环变量。 3.EXIT语句强行终止当前或指定循环。 4.可从循环体内跳到循环外，但不能从循环体外跳到循环体内。;6.6 隐含DO循环;几种常见的隐含DO循环的形式： 1.按指定步长读写。例如 PRINT *，（X（J），J=1，19，2） 2.隐含DO循环与普通变量混合使用。例如 PRINT *，A，B，（X（I），I=1，3），C 3.用于输出一些特殊符号。例如 PRINT *，（’-’，I=1，80） 4.隐含DO循环可以并列出现。例如 READ *,（A（I）,I=1,4）,（B（I）,I=1,4） 5.隐含DO循环可以嵌套使用。例如 PRINT *，（（A（I，J），J=1，5），I=1，3）;6.7 程序举例;【2】阅读下列程序： DO 10 K=5,1,-1 M=0 DO 20 J=K,5 M=M+K*J 20 CONTINUE CONTINUE WRITE(*，*)M END;【3】阅读下列程序： S=0.0 DO 10 I=1,2 DO 10 J=1,3 S=S+I+J 10 CONTINUE WRITE(*，*)S END;【4】在下列的双重循环中，内层的循环体执行的总次数为： DO 10 T=1.5,10.5,1.5 DO 10 I=1,10 〈循环体〉 10 CONTINUE;【5】为了计算并输出n!,其中n从键盘输入，下列各FORTRAN程序中正确的是： A) READ(*,*)N S=0.0 DO 10 I=1,N S=S*I CONTINUE WRITE(*,*)’S=’,S END;【5】为了计算并输出n!,其中n从键盘输入，下列各FORTRAN程序中正确的是： C) READ(*,*)N K=1 S=1.0 IF(K.LE.N)THEN S=S*K K=K+1 GOTO 10 END IF WRITE(*,*)’S=’,S END;【6】下列各循环中，正确的是： A) DO 10 I=1,10 D0 20 J=1,3 … CONTINUE 20 CONTINUE ;【6】下列各循环中，正确的是： C) DO 10 I=1,10 … IF(X.GE.0.0) I=11 … CONTINUE ;【7】下列的双重DO循环中，内层的循环体执行的总次数为： DO 10 I=1,10