5循环结构的实现.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值为 * 第八章 常用算法的程序设计举例 第一章 算法 第二章 计算机和计算机程序 第四章 逻辑运算和选择结构 第五章 循环结构的实现 第六章 Fortran的数据结构 第七章 数据的输入、输出 第三章 Fortran语言程序设计初步 * 第五章 循环结构的实现 循环操作： 重复执行一组指令 （或一个程序段） 循环分类： 无条件的循环 有条件的循环 * 5.1 用GOTO语句实现循环 例：打印30个学生的学号和成绩 N=1 100 READ (*,*) NUM, GRADE WRITE (*,*) NUM, GRADE N=N+1 IF ( N.LE. 30 ) GOTO 100 END 输入NUM,GRADE 打印NUM,GRADE 直到 GOTO语句破坏了语句顺序执行的正常状况，不符合结构化原则，因此一般不提倡使用GOTO语句！ GOTO 标号 属于直到型循环 * 5.2 用DO语句实现循环 DO 10 N=1, 30 READ (*,*) NUM, GRADE 10 WRITE (*,*) NUM, GRADE END DO语句 循环体 DO s[, ] v = e1, e2 [, e3] 循环终端语句标号 循环变量 循环变量初值 循环变量终值 循环变量增量 * DO语句几点说明： 1. e1、e2 、 e3可以是常数、变量或表达式 DO s[, ] v = e1, e2 [, e3] 2. e1、e2 、 e3的值可以正或负， e1、e2的值可以为0， e3的值不应为0 3. 脱离循环的条件：循环变量沿变化的方向超过终值 DO 10，T=5.0，25.0，0.5 DO 10，T= C，50.0/2.0，0.5 C=5.0 * 4. 循环次数计算公式为：r =INT((e2- e1+ e3)/ e3) 5. 如果v的类型和 e1、e2 、 e3的类型不一致，先将e1、