文档介绍：简单循环应用举例
教学目的:进一步熟悉三种循环构造和它们的区别，并能利用其解决一些简单应用问题。
教学重点:算法分析，语法构造。
教学难点：循环过程的理解。
教学方法：任务驱动式，演示和讲授相结合。
教学过程：
简单复****循环构造简单循环应用举例
教学目的:进一步熟悉三种循环构造和它们的区别，并能利用其解决一些简单应用问题。
教学重点:算法分析，语法构造。
教学难点：循环过程的理解。
教学方法：任务驱动式，演示和讲授相结合。
教学过程：
简单复****循环构造的三种根本形式。
for循环
当型循环
直到型循环
应用举例
例1：求一个数的所有因数。
1、分析算法步骤：
第一步，给定一个大于1的正整数n .
第二步，令i=1 .
第三步，用i 除n ，得到余数r 。
第四步，判断“r=0 "是否成立. 假设是，那么i是n的因数；否那么，i不是n的因数.
第五步，使i的值增加1，仍用i表示。
第六步，判断“i>n ”是否成立。 假设是，那么完毕算法；否那么，返回第三步。
2、画出流程图
3、学生动手设计代码，老师个别指导，必要时学生观看微课。
4、展示程序代码，强调不唯一。
Private Sub Command1_Click（)
Dim n As Integer
n = InputBox（”n=”)
i = 1
Do
r = n Mod i
If r = 0 Then
Print n; "的因数是"； i
End If
i = i + 1
Loop Until i > n — 1
End Sub
例2、质数的断定
先从详细例子开场分析算法
2、引导学生画出流程图，给出流程图
3、学生设计程序界面和代码
Private Sub