循环结构 - 循环结构44844538.ppt

第四章循环结构第一节循环语句( FOR 语句) 第二节当语句( WHILE 语句) 第三节直到循环( REPEAT 语句) 第四节多重循环结构在实际应用中,会经常遇到许多有规律性的重复运算,这就需要掌握本章所介绍的循环结构程序设计。在 Pascal 语言中,循环结构程序通常由三种的循环语句来实现。它们分别为 FOR 循环、当循环和直到循环。通常将一组重复执行的语句称为循环体,而控制重复执行或终止执行由重复终止条件决定。重复语句是由循环体及重复终止条件两部分组成。第一节循环语句( FOR 语句) for 语句的一般格式 for < 控制变量>:=< 表达式 1> to < 表达式 2> do < 语句>; // 递增型循环 for < 控制变量>:=< 表达式 1> downto < 表达式 2> do <语句>; // 递减型循环其中 for 、 to、 downto 和 do 是 Pascal 保留字。表达式 1 与表达式 2的值称为初值和终值。循环的语句格式: FOR 变量名:= 初值 TO 终值 DO 语句; 求 1+2+3+ ……+N 的和。如何编程呢? 【例】S: =0 ; FOR I : = 1 TO 10 DO S : = S + I ; Writeln (‘ S = ’,S); For 语句执行过程①先将初值赋给左边的变量(称为循环变量); ②判断循环变量的值是否“等于”终值,如已等于终值,则下次不再执行(本次是最后一次执行,循环变量的值也不更改),则跳到步骤⑥; ③如果小于等于终值,则执行 do 后面的那个语句(称为循环体); ④循环变量递增(对 to)或递减(对 downto) 1; ⑤返回步骤②; ⑥循环结束,执行 for 循环下面的一个语句。说明①循环变量必须是顺序类型。可以是整型、字符型、枚举型等, 但不能为实型。②循环变量的值递增或递减的规律是:选用 to则为递增;选用 downto 则递减。③循环体可以是一个基本语句,也可以是一个复合语句。④循环变量的初值和终值一经确定,循环次数就确定了。但是在循环体内对循环变量的值进行修改,常常会使得循环提前结束或进入死环。所以禁止在循环体中随意修改控制变量的值。如: for i : =1 to 10 do begin i : =2 * i+1; //禁止类似的修改, Free Pascal 中会提示语法错误 writeln(i); end; 以上 for 循环是一个死循环, i永远等于 2,不可能达到终止值 10 。⑤ for 语句中的初值、终值都可以是顺序类型的常量、变量、表达式。应用举例例 输出 1- 100 之间的所有偶数。程序如下: Program ex4_1; var i:integer; begin for i:=1 to 100 do if i mod 2=0 then write(i:5); end. 例 编程计算 1到 100 的累加和: s=1+2+3+ …+100 。【分析】设i为循环控制变量,累加和放在 s中,利用循环变量 i 的值从 1变化到 100 的规律,不需要另外引进从 1变化到 100 的其它变量,程序的流程图如 4-2 所示。程序如下: Program ex4_2; var s,i : integer; begin s := 0; for i := 1 to 100 do s := s+i; writeln(s); end. 运行结果: 5050 只要对程序稍加修改就可以计算出以下算式的值: s=1+1/2+1/3+ …+1/100 s=12+22+32+ …+1002 s=2+4+6+ …+100 等等。例 将顺序打印出 26 个小写英文字母: "abc …zz… cba" 。程序如下: Program ex4_3; var k : char; begin for k : ='a' to 'z' do write(k); for k : ='z' downto 'a' do write(k); writeln; end. 例 N 的阶乘是指 1到N的累乘,即 N! =1 *2*3*…* N ,输入一个数,求这个数的阶乘? 程序如下: Program ex4_4; var n,i : integer ; // i为循环变量 s : longint; //s 存放阶乘的结果,类型为长整型