第四章(3) 循环结构

16
练习 S=1－2＋3－4＋5－．．．－100
S=1+(－2)＋3+(－4)＋5－．．．+(－100) 例2 求Ｎ！ 分析：求Ｎ！既是求１到Ｎ这Ｎ个数的累乘， 需用到求累乘句型Ｐ＝Ｐ＊Ｉ，让这个句型重复N 次，让i取值分别为1到N即可完成求N个数的累乘。 可通过给i赋初值为1，设置循环条件为i<=n且 i=i+1实现
11
例 用pset方法实现画一条纵坐标为500横坐标范 围为500到1000的一条线 分析：画线可通过重复画点实现，重复操作可通 过循环实现 思考：画五色线 RGB（a,b,c）：a代表红色颜色值，b代表 绿色颜色值，c代表蓝色颜色值,取值范围0-255
12
课堂练习: 输出100到200之间能被3整除的数, 要求每行输出10个 提示: 判断能被3整除可用 i mod 3=0表示,可用 j表示能被3整除的个数，如果j能被10整除，就 换行，换行可通过空print语句。
循环体
Do 语句组
真
条件 假
Loop while <条件>
特点：先执行一次循环体，再判断循环条件， 条件成立继续执行循环体，否则退出循环
34
例 求s=1+2+3+…+100
分析：这是求100个数的累和问题，可用累 和句型s=s+x，要控制x既i取值为1、2、 3…100，可通过给i赋初值为1，循环条件为 i<=100,且i=i+1，这样就可以求出前100个数 的累和
第04章(3) 循环结构
主讲教师：董小艳
联系电话：87092417
计算机应用教研室
引例：
1. 编程计算1+2+3+4+5+6+7+8+9+10的值。
Dim s As Integer s = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 Print s
2. 编程计算1+2+3+……+100的值。
7
课堂练习：求S=1－１／２＋１／３－１／４ ＋ ．．． －1/100
例3 求100!
i = 分析：求N!是求累乘操作，可通过多次重复乘 1: p = 1:p = p * i
操作完成，这里我们让N取值分别为1 到 N，重复 i = 2: p = p * i P=P*I操作即可完成.
i = 3: p = p * i
2.说明
① 循环变量必须是数值型，且最好为整型数。 For i = 1 To 10 step 1
Print i
Next i
4
② 当步长为正时，初值必须小于终值，当步长 为负时，初值必须大于终值，循环才能进行。 当步长为1时，“Step 1”可以省略。 For i = 1 To 10 Step 1 For i = 10 To 1 Step -1 ③ 正常退出循环的情况下，For……Next循环 的循环次数可以用公式算出来 i Print i Print
20
例5 求自然对数的近似值，要求误差小于10-4， 近似公式为
1 1 1 1 e 1 ... 1! 2! 3! n!
分析：这是一个求累和问题，可用s=s+x句型完 成。 其中每一项为阶乘分之一，可用f=f/i句 型求得
21
4.3.3 嵌套
循环可嵌套,如一个 FOR语句可套用一个FOR语句, 如一个DO语句可套用一个DO语句, 如一个 FOR语 句可套用一个DO语句
很显然，用上道题的方法来求解这道题，编写程 序将会非常的麻烦。
2
主要内容
4.3.1 For-next 循环结构
4.3.2 Do –while循环结构
4.3.3 循环的嵌套
4.3.4 算法举例
4.3.5 DO循环的其它结构
3
4.3.1 For-Next 语句
1.格式
For 循环变量=初值 To 终值 Step 步长 语句序列（<循环体>） Next 循环变量
…. I=100 P=P*I
P=P*I S=S+P P=100！ S=S+P
S=1！+2！+3！+…+100！
9
例5 求下列数列的前n项和 2/1, 3/2, 5/3,8/5,13/8,… 分析: 求累和可用s=s+x句型, 可发现该数列有如下规律xn=1/xn-1+1,利 用该规律可计算出xn的值
32
例 求s=1+2+3+…+100 分析：这是求100个数的累和问题，可用累和 句型s=s+x， 要控制x既i取值为1、2、3…100，可通过给i 赋初值为1，并i=i+1，且在循环加入if i>100 then exit do,这样就可以求前100个数的累和。
33
2. Do…loop while 格式：
如果要输出 1×1=1 1×2=2 1×3=3 ….1×9=9
如果要输出 1×1=1
2×1=2 9×1=9
1×2=2 1×3=3
2×2=4 2×3=6 ……
….1×9=9
….2×9=18
9×2=18 9×3=27 ….9×9=81
23
例 输出如下图形 00 0000 000000 00000000 0000000000 .000000000000 分析：每一行0的个数是行数的2倍，且每一行都 比它前面一行输出起点向前措一位
终值 初值 Next i 循环次数 Int ( Next i 1) 步长
5
例1 求S=1+2+3+．．．＋100 x = 1 分析:这是求100个数的累和问题，可用 s = s + x S=S+X句型，让这个句型重复100次,让x的取值 x = 2 分别为１、2、3…100。 s = s + x x = 3 重复语句是s=s+x, 将其作为循环体，控制 s = s + x 循环变量取值为1 到100即可实现求100个数累 ... 和 x = 100 s = s + x
例1.S=1+2+3+…+100 分析：这是求100个数的累和问题，可用累和句 型s=s+x，要控制x既i取值为1、2、3…100，可通 过给i赋初值为1，设置条件i<=100,且i= i+1实现 S=1+1/2+1/3+。。。+1/N 分析：这是求累和问题，可套用S=S+X句型，这 里的X=1/i，要控制i取值为1、2、3…n可通过赋初 值为1，循环条件为I〈=Ｎ，且i=i+1实现
30
4.求数列 求数列一般给出初始几项（或最后几项）， 再给出推导公式（或规律）。 斐波那契（Fibonaccii）数列。已知一个 数列的前两项均为1，从第三项开始，每一项 为其前两项之和，求这个数列的前20项
31
4.3.5 Do 语句其他结构
1.Do …loop
格式：
Do
循环体
语句组
Loop
注意：这是一种无条件的循环结构，在这个结 构中必须加入exit do 语句，否则会出现死循 环。
思考：求P=1*3*5*。。。*（2*N－1）
...
i = 100: p = p * I
8
例4 求1！+2！+3！+。。。+100！ 分析：这是一个求累和问题，可用到句型 I=1 P=P*I P=1！ S=S+P S=1！ S=S+X，其中每一项又是一个阶乘，求每一项 I=2 P=P*I P=2！ S=S+P S=1！+2！ 可用句型P=P*I句型。也就是说，重复的句型 为： P=P*I P=3！ I=3 S=S+P S=1！+2！+3！
29
3. 求两个数的最大公约数和最小公倍数。 分析：求最大公约数可用辗转相除法。 这种方法用自然语言描述如下：(24,38)
1)输入Ｍ、Ｎ，
2)以Ｍ为被除数，Ｎ为除数，求得余数为Ｒ 3)若Ｒ<>0 ，将Ｎ赋给M，将Ｒ赋给Ｎ，继续用 Ｍ除以Ｎ，直到R=0为止 4)这时的N即为所求
最小公倍数为两个数的乘积除以最大公约数
27
课堂练习 键盘键入10个数，找出其中最小数 提示: 引入变量min存放最小数，假定第一个数最 小，将它赋值给min，让min与其余的数比较，如发 现有比它小就把这个较小数赋值min，保证min里放 的是这两两比较的较小数。重复这个操作直到min 与所有数比较完，则min放的就是这一组数的最小 数
17
求 1！+2！+3！+。。。+100！ 分析：这是一个求累和问题，可用到句型 S=S+X，其中每一项又是一个阶乘，求每一项可 用句型P=P*I句型。也就是说，重复的句型为： P=P*I
S=S+P
18
例3 如果我国人口以每年平均1.5%的速度增长， 问多少年后我国人口达到或超过18亿，设现在我 国人口为13亿。
FOR I=1 to 5 For i = 1 To 10 ① 内外嵌套不能交叉，外层要完全包含内层。 FOR J=1 to 5 ② 在循环嵌套中，内外循环的循环变量不能同 For i = 1 To 5 NEXT I 名。 Next i NEXT J Next i
22
注意：
例 打印九九乘法表,
如果要输出 1×1=1
分析：用计算机解此问题的方法是在13亿的基 础上连续累乘（1+0.015），当大于或等于18亿 时停止，统计乘了多少次即可，因此就要用到乘 法模型“p=p*i”和统计要用计数语句n=n+1。