06第六课 for循环语句

第六课　for循环语句

在实际应用中，会经常遇到许多有规律性的重复运算，这就需要掌握本章所介绍的循环结构程序设计。在Pascal语言中，循环结构程序通常由三种的循环语句来实现。它们分别为FOR循环、当循环和直到循环。通常将一组重复执行的语句称为循环体，而控制重复执行或终止执行由重复终止条件决定。因此，重复语句是由循环体及重复终止条件两部分组成。

一、for语句的一般格式

for <控制变量>:=<表达式1> to <表达式2> do <语句>;

for <控制变量>:=<表达式1> downto <表达式2> do <语句>;

其中for、to、downto和do是Pascal保留字。表达式1 与表达式2的值也称为初值和终值。

二、For语句执行过程

①先将初值赋给左边的变量（称为循环控制变量）；

②判断循环控制变量的值是否已"超过"终值，如已超过，则跳到步骤⑥；

③如果末超过终值，则执行do后面的那个语句（称为循环体）；

④循环变量递增（对to）或递减（对downt o)１；

⑤返回步骤②；

⑥循环结束，执行ｆｏｒ循环下面的一个语句。

三、说明

①循环控制变量必须是顺序类型。例如，可以是整型、字符型等，但不能为实型。

②循环控制变量的值递增或递减的规律是：选用to则为递增；选用downto则递减。

③所谓循环控制变量的值"超过"终值，对递增型循环，"超过"指大于，对递减型循环，"超 过"指小于。

④循环体可以是一个基本语句，也可以是一个复合语句。

⑤循环控制变量的初值和终值一经确定，循环次数就确定了。但是

在循环体内对循环变量的值进行修改，常常会使得循环提前结束或进入死环。建议不要在循环体中随意修改控制变量的值。

⑥for语句中的初值、终值都可以是顺序类型的常量、变量、表达式。

四、应用举例

例1．输出1－100之间的所有偶数。

var i:integer;

begin

for i:=1 to 100 do

if i mod 2=0 then write(i:5);

end.

例2．求N！＝1＊2＊3＊…＊N ，这里N不大于10。

分析：程序要先输入N，然后从1累乘到N。

程序如下：

var

n,i : integer；｛i为循环变量｝

S : longint;｛s作为累乘器｝

begin

write('Enter n=');readln(n);{输入n}

s:=1;

for i:=2 to n do｛从2到n累乘到s中｝

s:=s*i;

writeln(n,'!=',s);｛输出n!的值｝

end.

s:=s*

练　习

1．求s=1+4+7+…+298的值。

2．编写一个评分程序，接受用户输入5个选手的得分(0-10分)，然后去掉一个最高分和一个最低分，求出某选手的最后得分(平均分)。

3．用一张2角票换1分、2分的硬币，每种至少一枚， 问有哪几种换法（各几枚）？

4．用一张5角票换1分、2分和5分的硬币，每种至少一枚， 问有哪几种换法（各几枚）？

5．百钱买百鸡，公鸡3文钱一只，母鸡2文钱一只，小鸡1文钱3只，100文钱刚好买了100只鸡，有几种方法？怎么买？。