while 循环语句whie 循环语句while 循环语句while 循环语句.ppt

循环结构程序设计 安庆四中 丁贤友 while 循环语句 格式： 　　　while 布尔表达式do 　　　　　　循环体； 功能： （１）计算布尔表达式的值； （２）若布尔表达式的值为true ，则转（３） ，否则，转（５） ； （３）执行循环体； （４）转（１） ； （５）循环结束，执行循环体后面的语句。 while 循环语句的执行过程 说明： （１）在进入循环体之前测试布尔表达式的值，若最初的值为false ，则根本不进入循环体。 （２）为了使循环能终止，循环体中一定要有影响布尔表达式的操作，否则该循环将陷入死循环。 （３）循环体只能是一条简单的语句或一条复合语句。 例如： 　　s:= 0 ； 　　i:= 1 ； 　　while (i= 4) do 　　begin 　　　　s:=s＋i； 　　　　i:=i＋1 ； 　　end ； begin 和end 括起来的就是while 循环语句的循环体。 while 循环语句的应用 【例4‐8】　输入一串以“ ？”为结束标志的字符，统计其中字母和数字的个数。 问题分析： 很明显，本题是一个计数问题：重复读入字符，根据字符的类别，进行统计。但是，输入多少个字符呢？ 题目中没有明确说明，只说明了结束输入的标记。由于这个重复操作的次数未知，不适于应用for 循环语句了。而解决未知次数的循环是while 循环语句所擅长的，因此本题应用while 循环语句来解决。 算法描述： （１）计数器初始化:字母个数zm←０ ，数字个数sz←０ ； （２）读入一个字符给ch ； （３）当该字符ch 不是“ ？”时，重复操作： ① 若ch 是字母，则字母个数加１ ∶ zm ← zm ＋ １ ， ② 若ch 是数字，则数字个数加１ ∶ sz ← sz ＋ １ ， ③ 读入一个新字符给ch ； （４）输出统计结果zm 和sz ； （５）结束。 program exam4＿8 ； var ch∶ char ； 　zm ，sz∶ integer ； begin 　zm ∶＝ 0 ； 　sz∶＝ 0 ； 　read（ch） ；　　／／在循环外读入第一个字符，使while的条件能正常判断 　while ch＜ ＞ ？ do 　　begin 　　　if （（ch＞ ＝ a） and （ch＜ ＝ z）） or （（ch＞ ＝ A） and （ch＜ ＝ Z）） then 　　　　zm ∶＝ zm ＋ 1 　　／／输入的是字母 　　　else if （ch＞ ＝ 0） and （ch＜ ＝ 9） then 　　　　sz∶＝ sz＋ 1 ；　／／输入的是数字 　　　read（ch） ；　　／／继续读入字符 　　end ； 　writeln（The numberof letters is ：，zm） ； 　writeln（The numberof figures is ：，sz） ； end ． 【例4‐9】　求两个正整数m 和n 的最大公约数。 问题分析： 最大公约数（greatest common divisor ，简写为gcd）是指几个数共有的因数之中最大的一个，例如８ 和１２ 的最大公约数是４ ，记作gcd（８ ，１２） ＝ ４ 。 辗转相除法的算法思想是：对于给定的两个正整数，用较大的数除以较小的数，若余数不为零，则将余数和较小的数构成一对新数，继续进行上面的除法，直到大数被小数除尽，这时较小的数就是原来两个数的最大公约数。 算法描述： （１）计算被除数m 除以除数n 的余数r ； （２）当r ≠ ０ 时，重复下面操作： ① m ← n ； ② n ← r ； ③ r ← m mod n ； （３）输出最大公约数n ； （４）结束。 程序设计： program exam4＿9 ； varm ，n ，r∶ integer ； begin 　write（Please input m ，n ：） ； 　readln（m ，n） ； 　r∶＝ m mod n ；　　／／r取m 和n的余数 　while r＜ ＞ 0 do　／／辗转相除 　　begin 　　　　m ∶＝ n ； 　　　　n∶＝ r ； 　　　　r∶＝ m mod n ； 　　end ； 　writeln（The greatestcommon divisor is ：，n） ； end ． 【例4‐10】　设计问题４‐３ 的程序。 program exam4＿10 ； var 　n∶ integer ； 　score ，tot ，min ，max∶ real； begin 　writeln（Please input the scores ，and end the inputby print － 1 ！） ； 　n∶＝ 0 ；　／／初始化人数 　tot∶＝ 0