fortran循环结构的实现资料.ppt

* DO 10 , K=2.5, -1.6 , 1.5 循环体 10 CONTINUE 2. 在下列程序段中，循环体被执行的次数为 A) 0 B) 3 C) 4 D) 无穷大 解：没有任何说明，隐含K为整型，首先将三个循环参数转换为整型量2，-1，1，根据计算公式r=INT((-1-2+1)/1)=-20，即循环次数为0。 * DO 10 K=5，1，-1 M=0 DO 20 J=K，5 M=M+K*J 20 CONTINUE 10 CONTINUE WRITE（*，*）M END 3. 阅读下列FORTRAN77程序 A) 120 B) 15 C) 140 D) 135 上述程序运行后，输出的M值为 * 解：这是一个双重循环。在外循环的循环体中，每次都对M清零，因此只考虑外循环的最后一次循环中所执行的内循环。外循环最后一次循环的K为1，最后一次执行的循环体相当于右图：M=1+2+3+4+5=15 DO 10 K=5，1，-1 M=0 DO 20 J=K，5 M=M+K*J 20 CONTINUE 10 CONTINUE WRITE（*，*）M END M=0 DO 20 J=1，5 M=M+J 20 CONTINUE * DO 10 I=1，2 S=0.0 DO 10 J=1，3 S=S+I+J 10 CONTINUE WRITE（*，*）S END 4. 阅读下列FORTRAN77程序 A) 21.0 B) 9.0 C) 12.0 D) 6.0 上述程序运行后，输出的S值为 * 解：这是一个双重循环。内外循环共用一个CONTINUE语句。由于外循环的循环体中每次都对S清零，因此，只有在最后一次执行内循环时S的累加结果才是最后输出的结果。S=(2+1)+(2+2)+(2+3)=12 * S=0.0 DO 10 I=1，2 DO 10 J=1，3 S=S+I+J 10 CONTINUE WRITE（*，*）S END 5. 阅读下列FORTRAN77程序 A) 21.0 B) 9.0 C) 12.0 D) 6.0 上述程序运行后，输出的S值为 * 解：这个程序和上个题目的根本区别是：在双重循环的外面给S清零。因此，将对两次外循环执行时的I和J的值进行累加，即S= [(1+1)+(1+2)+(1+3)]+[(2+1)+(2+2)+(2+3)]=9+12=21 * DO 10 T=1.5，10.5，1.5 DO 10 I=1，10 循环体 10 CONTINUE 6. 在下列的双重循环中，内层的循环体执行的总次数为 A) 10 B) 40 C) 30 D) 70 解：外循环执行的次数为 r1=INT((10.5-1.5+1.5)/1.5)=7 内循环执行的次数为 r2=INT((10-1+1)/1)=10 因此，内层循环体共执行7×10=70（次） * DO 10 A=-1.6，3.2，-1.6 DO 10 K=1，3，2 循环体 10 CONTINUE 7. 在下列的双重循环中，内层的循环体执行的总次数为 A) 3 B)