1、本网站免费注册后即可以下载，点击开通VIP会员可无限免费下载！
2、资料一般为word或PPT文档。建议使用IE9以上浏览器或360、谷歌、火狐浏览器浏览本站。
3、有任何下载问题，请联系微信客服。
扫描下方二维码，添加微信客服
沪科教版选修1 算法与程序设计《第2章 程序设计基础 第四节 循环结构 学习指引 实现循环结构的语句》优秀教案设计
教学过程：
简单复习循环结构的三种基本形式。
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