第6讲 循环结构程序设计(pascal程序语言基础).ppt

集里中学： 徐 晨 辉 2006/9/1 第六讲 循环结构程序设计（2） 主要内容： 1、while语句 2、repeat语句 一、用while语句实现循环结构 while语句的格式： while 布尔表达式 do 语句 while语句的执行过程： 判断布尔表达式的值,如果为true,执行步骤2,否则执行步骤4; 执行循环体语句； 返回执行步骤1 结束循环,执行下一语句 program text1; var i,sum:integer; begin i:=1; sum:=0; while i=100 do begin sum:=sum+i; i:=i+1; end; writeln(‘sum=‘,sum); end. 例：求100以内所有自然数的和(while语句) i=100 Sum:=sum+i; i:=i+1; Writeln(^^); i:=1 Sum:=0 T F 语句 练习： 求100以内所有奇数的和(while循环) while循环的特点： 先判断后执行 循环变量的递增(递减)在“语句”中自行控制 用repeat-until语句实现循环结构 repeat：重复； until：直到； repeat-until语句的格式： repeat 语句 until 布尔表达式 含义：重复执行语句，直到布尔表达式为true为止 例：求100以内所有自然数的和(repeat-until语句) program test2; var I,sum:integer; begin i:=1; sum:=0; repeat sum:=sum+i; i:=i+1; until i100 writeln(‘sum=‘,sum); end. i100 Sum:=sum+i; i:=i+1; Writeln(^^); i:=1 Sum:=0 F 语句 T 练习： 求s=1+4+7+10…+298的值。 循环语句结构 i=100 sum:=sum+i Writeln(^^); i:=i+1 i:=1 T F sum:=0 求100以内所有自然数的和(三种结构） i=100 sum:=sum+i; i:=i+1; Writeln(^^); i:=1 Sum:=0 T F i100 sum:=sum+i; i:=i+1; Writeln(^^); i:=1 Sum:=0 T F 循环语句结构 各种循环语句特点归纳： for循环的特点： while循环的特点： repeat循环的特点： 循环次数确定不变 循环变量为顺序类型 每执行完一次，循环 变量自动递增（递减） 1 循环体可以是一个语句 或者是一个复合语句； 循环次数不确定 没有循环变量的概念 循环条件的递增 （递减）需要人工设置 循环体可以是一个语句 或者是一个复合语句； 先判断，再执行 循环次数不确定 没有循环变量的概念 循环条件的递增 （递减）需要人工设置 循环体是被包含在 repeat……until的所 有语句； 先执行，再判断 循环结构中终止循环的语句 continue;(退出本次循环) break;（退出循环体） 试一试： program test3; var i:integer; begin for i:=1 to 10 do begin if i=4 then continue; write(i:3); end; writeln(‘tesing the program’); end. program test4; var i:integer; begin for i:=1 to 10 do begin if i=4 then break; write(i:3); end; writeln(‘tesing the program’); end. 1 2 3 5……10testing…… 1 2 3testing…… * * * * * * * * * * 集里中学： 徐 晨 辉 * * * * * * * * * *