循环结构语句格式及应用案例.pptx

教科版高中信息技术算法与程序设计高二年级第二学期循环结构语句格式与应用案例湖北省远安县第一高级中学 王文慧循环结构语句格式循环结构语句格式 及应用案例及应用案例学习目标学习目标1、掌握DO循环语句与FOR循环语句的使用方法2、学会用循环语句解决实际问题的方法Do 语句语句Do while 条件表达式 语句块（循环体）loopFor 语句语句For 循环变量循环变量=初值初值 to 终值终值 step 步长步长 语句块语句块（循环体）循环体）Next 循环变量循环变量DO语句与语句与FOR语句对比（语句对比（1到任意数累加运算）到任意数累加运算）Dim s,i,n AS Integern=val(text1.text)s=0i=1Do while i=n s=s+i i=i+1LoopText2.text=str(s)Dim s,i,n AS Integern=val(text1.text)s=0For i=1 to n s=s+iNext iText2.text=str(s)试一试：求试一试：求2+4+6+8+100 的和的和dim s as long,i as Integers=0for i=2 to 100 step s=Next i Dim s as long,I as Integer s=0:i=2do while i=100 s=s+i _ loop 2S+ido while 循环一般用在循环次数不确定的情况下循环一般用在循环次数不确定的情况下for next 循环一般循环一般用用在在循环循环次数非常明确情况次数非常明确情况i=i+2程序应用实践：国际象棋盘上的麦粒程序应用实践：国际象棋盘上的麦粒1248163264128263n分析数量变化分析数量变化格（格（i）每格存放粒数（每格存放粒数（P）累加和（累加和（S）111221+2341+2+4481+2+4+8.i(64)2(i-1)S+P程序界面程序界面Text1Text2command1程序代码（在程序代码（在VB里面实现并输出里面实现并输出64格棋盘的麦粒总数）格棋盘的麦粒总数）Private Sub Command1_Click()Dim n,i As Integer,p,s As Double n=Val(Text1.Text)s=_ p=_ for i=1 to n _ _ next i Text2.Text=Str(s)End Sub00s=s+p p=2(i-1)思考并在程序中计算实现：n假如每颗麦粒的重量为0.2克，每人每天消耗0.5千克，算一算上面棋盘上的麦粒能供全球60亿人吃多少年？（供参与的VB表达式）Year=(s*0.2)/(500*60*108*365)