FORTRAN 程序设计03.pptVIP

三、循环结构 循环结构在程序中是十分重要的结构 GOTO 语句（无条件循环） GOTO 标号 1、DO语句和循环次数 DO（标号）循环变量=初值，终值，步长 例如：读入30个学生的学号和成绩并显示。 !----读入30个学生的学号和成绩 Program exp2 Implicit Integer num,grade,n do 10,n=1,30,1 read*,num,grade 10 print*,num,grade End 循环次数=INT((终值-初值+步长)/步长) 计算循环次数时应注意类型转换的影响。 如：do i=1.5，3.6，1.2 INT((3.6-1.5+1.2)/1.2)=2 do i=1，3，1 循环3次 循环执行过程： ⑴计算初值、终值、步长、转换成整型 ⑵将初值赋给循环变量 ⑶计算循环次数 ⑷检查循环次数，若≤0 停止循环执行循环终端 下面部分，若〉0 执行循环体。 ⑸执行到终端语句时，循环变量加步长。 ⑹循环次数减1 ⑺返回⑷ 重复执行 ⑷⑸⑹⑺直到循环次数≤0 循环终端语句 End do （常用于无语句标号时） Continue （常用于有语句标号时） Do 循环嵌套 ：在一个Do 循环体中又完整的包含另一个Do 循环。 一般形式为 do i=1,20,3 ------- do j =1,30,2 ---------- do k =1,40 ---------- end do end do end do 2、 Do 循环规则： a 循环变量在循环体内可以被引用，但不能再赋值。 如： do n=1,10 --------- k=n＊3 （合法） n= 2＊k (非法 ) ---------- end do b 循环次数是根据初值、终值、步长计算出来的，在执行循环体期间是确定的。 C 可以用转移语句从循环体内转到循环体外，也可以在循环体内转移，但是不允许从循环体外转到循环体内。 D 多个循环体可以共用一条循环终端语句，但循环体必须完全包含在外围Do 循环体内。 E 当Do 循环出现在 if else 块内，则Do 循环范围必须完全包含在该块内。 F 当 if else，case 语句出现在Do 循环范围内，则相应的end if end select 语句也必须出现在这个Do 循环体内 3、 隐Do 循环 （常用于读写语句输入、输出表，用来控制重复读、写的次数） 如： read＊,(value(i),i=1,20) 表示读入alue(1),value(2)…… value(20)的值 write(＊ , ＊ ) (a,b,n=1,5) 表示重复输出a,b 的值5次 隐Do 循环也可以嵌套 print ＊,((a(i,j),i=1,3),j=1,3) a(1,1) , a(2,1), a(3,1) a(1,2), a(2,2), a(3,2), 1 a(1,3), a(2,3), a(3,3) 4、 选择结构 a 关系运算： .LT. 小于 .LE. = 小于等于 .EQ. == 等于 .NE. /= 不等于 .GT. 大于 .GE. = 大于等于 b if 语句 if (condition) statement 如： ----------------- if(jk) s=n+3 ---