2.4程序的循环结构（二）.ppt

* 2.4 程序的循环结构 FOR 循环语句的基本格式 For 循环变量=初值 To 终值 Step 步长 语句组 Next 循环变量 知识回顾 循环变量=初值 执行循环体（语句组） 循环变量增加一个步长 是 否 FOR 循环语句的执行过程 循环变量超过终值 知识回顾 Dim i As Integer Dim s As Integer s=0 For i=1 To 5 Step 1 s=s+i Next i Print s=;s i s Next i ① 1 1（0+1） 2 ② 2 3 （1+2） 3 ③ 3 6 （3+3） 4 ④ 4 10 （6+4） 5 ⑤ 5 15 （10+5） 6 拓展运用： 累加器：s=s+i(一般s的初值为0) 例1 阅读程序，分析结果 Dim i As Integer Dim t As Integer t=1 For i=1 To 5 Step 1 t=t*i Next i Print t=;t i t Next i ① 1 1（1*1） 2 ② 2 2 （1*2） 3 ③ 3 6 （2*3） 4 ④ 4 24 （6*4） 5 ⑤ 5 120 （24*5） 6 拓展运用： 累乘器：t=t*i(一般t的初值为1) 例2 阅读程序，分析结果 例3 编程计算s=1+3+5+……+99（计算1——100之间的 奇数和） 一、分析问题： 设循环变量为i, s计算累加和。 二、设计算法： 三、编写程序： Cls Dim i As Integer, s As Integer s=0 For i=1 To 100 Step 2 s=s+i Next I Print s=;s 四、调试程序 拓展运用： 课堂小结 1.循环变量“超过”终值的含义： 步长为正，大于终值 步长为负，小于终值 2.For循环的循环体执行次数： （终值-初值）/步长+1的整数部分 3.累加器：s=s+i(一般s的初值为0) 4.累乘器：t=t*i(一般t的初值为1) 课堂练习： 1.编程计算1——100之间的偶数和。 （参考答案：2550） 2.编程计算s=100+90+80+……+10。 (参考答案：550） 拓展运用： 1、编程打印出所有的“水仙花数”。 一、分析问题： “水仙花”数是一个三位整数，它的百位a，十位b，个位c， s=a^3 + b^3 + c^3，若s=i，则是水仙花数，否则不是水仙花数。 二、设计算法： 三、编写程序： Dim i As Integer, s As Integer Dim a As Integer, b As Integer, c As Integer For i=100 To 999 a=i\100 b=i\10 Mod 10 c=i Mod 10 s=a^3+b^3+c^3 If s=i Then Print I End If Next i 四、调试程序 如：153= 1^3 + 5^3 + 3^3 * *