1、第六课 for 循环语句在实际应用中，会经常遇到许多有规律性的重复运算，这就需要掌握本章所介绍的循环结构程序设计。在 Pascal 语言中，循环结构程序通常由三种的循环语句来实现。它们分别为 FOR 循环、当循环和直到循环。通常将一组重复执行的语句称为循环体，而控制重复执行或终止执行由重复终止条件决定。因此，重复语句是由循环体及重复终止条件两部分组成。一、for 语句的一般格式for := to do ;for := downto do ;其中 for、to、downto 和 do 是 Pascal 保留字。表达式 1 与表达式 2 的值也称为初值和终值。二、For 语句执行过程先将初值赋给左
2、边的变量（称为循环控制变量）；判断循环控制变量的值是否已“超过“终值，如已超过，则跳到步骤；如果末超过终值，则执行 do 后面的那个语句（称为循环体）；循环变量递增（对 to）或递减（对 downt o)；返回步骤；循环结束，执行循环下面的一个语句。三、说明循环控制变量必须是顺序类型。例如，可以是整型、字符型等，但不能为实型。循环控制变量的值递增或递减的规律是：选用 to 则为递增；选用 downto 则递减。所谓循环控制变量的值“超过“终值，对递增型循环，“超过“指大于，对递减型循环，“超 过“指小于。循环体可以是一个基本语句，也可以是一个复合语句。循环控制变量的初值和终值一经确定，循环次数
3、就确定了。但是在循环体内对循环变量的值进行修改，常常会使得循环提前结束或进入死环。建议不要在循环体中随意修改控制变量的值。for 语句中的初值、终值都可以是顺序类型的常量、变量、表达式。四、应用举例例 1输出 1100 之间的所有偶数。var i:integer;beginfor i:=1 to 100 doif i mod 2=0 then write(i:5);end.例 2求 N！123N ，这里 N 不大于 10。分析：程序要先输入 N，然后从 1 累乘到 N。程序如下：var n,i : integer；i 为循环变量S : longint;s 作为累乘器beginwrite(Enter n=);readln(n);输入 ns:=1;for i:=2 to n do从 2 到 n 累乘到 s 中s:=s*i;writeln(n,!=,s);输出 n!的值end.练 习1 求 s=1+4+7+298 的值。2 编写一个评分程序，接受用户输入 10 个选手的得分(0-10 分)，然后去掉一个最高分和一个最低分，求出某选手的最后得分(平均分)。3 用一张一元票换 1 分、2 分和 5 分的硬币，每种至少一枚， 问有哪几种换法（各几枚）？
