初中九年级信息技术活动5 编程解决问题for.next循环

在一定的条件下，不断重复同样的的操作。某个固定位置上的工人劳动，有什么共同特点？信息技术舒城县春秋乡中心学校2024/1/27第三单元加工信息活动5编程解决问题--For…next循环舒城县春秋乡中心学校詹耀华徐平平第三单元加工信息信息技术信息技术九年级下册科学出版社舒城县春秋乡中心学校2024/1/27信息技术学习目标

一、了解什么是循环结构

二、理解For…Next循环结构的语句格式三、掌握For…Next循环结构的基本运用舒城县春秋乡中心学校2024/1/27信息技术课前自主学习检测一、将For…Next循环结构补充完整For

To<终值>[Step<步长>]

.

Next

.

<循环变量>=<初值><循环体><循环变量>二、For…Next循环结构的三大要素1、

.2、

.3、

.<循环终止条件><循环变量><循环体>舒城县春秋乡中心学校PrivateSubCommand1_Click()i=1Printi;i=i+1Printi;i=i+1Printi;i=i+1Printi;i=i+1Printi;i=i+1Printi;1、运行结果：12345678910i=i+1Printi;i=i+1Printi;i=i+1Printi;i=i+1PrintiEndSub比一比如果我们需要在窗体上输出更多的1，几十个甚至上百个…那要怎么办呢？信息技术阅读如下程序代码：在窗体显示1到10之间所有自然数。比一比舒城县春秋乡中心学校2024/1/27PrivateSubCommand2_Click()Fori=1To10Step1Printi;NextiEndSub2、开始i←1i>10i←i+1输出i结束NY运行结果：12345678910阅读如下程序代码：在窗体显示1到10之间所有自然数。信息技术舒城县春秋乡中心学校2024/1/27对比演示信息技术舒城县春秋乡中心学校在窗体显示1到10之间所有自然数。2024/1/27(1)把初值赋给循环变量。(2)检查“循环变量”的值是否超过终值。(3)如果不超过,就执行一次“循环体”，然后把“循环变量+步长”赋给“循环变量”然后返回判断。(4)如果超过就停止执行“循环体”，跳出循环，执行“Next”后面的语句。

循环结构是指程序重复执行循环语句中的一行或多行代码，重复执行的程序块称为“循环体”，使用循环可以避免重复不必要的操作，简化程序，节约内存，提高效率。循环结构三要素是循环变量、循环体和循环终止条件。一、什么是循环结构？信息技术舒城县春秋乡中心学校2024/1/27For<循环变量>=<初值>

To<终值>[Step<步长>]<循环体>Next<循环变量>注意：

1、在For循环语句中，For和Next是一对语句，必须成对出现，缺一不可。2、Step可以省略，这时步长默认为“1”。

思考：循环变量的增量即步长，能否为0？如果为0，程序的运行结果怎样？二、For…Next循环结构的语句格式信息技术舒城县春秋乡中心学校2024/1/27注意：在For…Next循环体中，循环体变量的初值和终值都是数值型。

在此循环结构中，_____是循环变量，_____是初值，_____是终值，“sum=sum+i”是____________。在步长为2的情况下，共执行_____次“sum=sum+i”语句。i150循环体25For

循环变量=初值To终值Step步长

循环体Next

循环变量步长是1可以省略不写Fori=1To50Step2sum=sum+iNexti例二、For…Next循环结构的语句格式信息技术舒城县春秋乡中心学校2024/1/27二、循环结构流程图表示在实际生活、学习过程中，有哪些循环结构的例子？交通信号灯四季更替1信息技术舒城县春秋乡中心学校2024/1/27思考：如果最后一个数是，你该花多少时间算出答案。10001计算题：用三分钟的时间计算的值。任务一：试着计算分数相加总和信息技术舒城县春秋乡中心学校2024/1/27n计算的值信息技术舒城县春秋乡中心学校2024/1/27PrivateSubCommand1_Click()DimsAsSingle,iAsInteger,nAsIntegers=0n=Val(Text1.Text)Text2.Text=Str(s)EndSub设：s是分数的总和i是循环变量初值是_____终值是_____步长是_____循环体是___________11s=s+1/iFori=1tons=s+1/iNextinn信息技术舒城县春秋乡中心学校2024/1/27

在印度有一个古老的传说，国王打算奖赏发明了国际象棋的大臣，国王问他想要什么，他对国王说，陛下，我只要些麦粒，请您在这张棋盘的第1个小格放1粒麦子，第2个小格放2粒，第3小格放4粒，第4小格放8粒……以此类推，把64格棋盘放满就行了，国王觉得这个要求太容易满足了，就答应给他这些麦粒。当人们把一袋一袋的麦子搬来开始计数时，国王才发现，就算把全印度甚至全世界的麦粒都拿来，也满足不了他的要求……

那么，那位大臣要求得到的麦粒到底有多少呢？任务二：计算棋盘上的麦粒总数棋盘上的麦粒信息技术舒城县春秋乡中心学校2024/1/27一、任务分析格(i)当前格子存放的麦粒数棋盘上麦粒的总数(s)11121*2=21+2=332*2=43+4=744*2=87+8=15·········n2(i-1)S+2(i-1)棋盘的第一格放1粒麦粒，第二格放2粒麦粒，第三格放4粒麦粒，第四格放8粒麦粒，即后面一格的麦粒数是前一格的2倍……以此类推，请问第n格时整个棋盘上的麦粒总数是多少？信息技术舒城县春秋乡中心学校2024/1/27二、流程图信息技术舒城县春秋乡中心学校2024/1/27三、程序界面n=Val()Text2.Text=Str()Text1.TextSText1Text2信息技术三、界面及说明舒城县春秋乡中心学校2024/1/27信息技术四、演示舒城县春秋乡中心学校2024/1/27四、完成代码输入For循环变量=初值To终值Step步长（步长1可以省略）

循环体Next循环变量

循环变量：i初值：1终值：n

步长：1循环体：s=s+2^(i-1)信息技术五、循环结构分析舒城县春秋乡中心学校2024/1/27PrivateSubCommand1_Click()DimnAsInteger,iAsInteger,sAsDoublen=Val(Text1.Text)Text2.Text=Str(s)EndSubFori=1Tons=s+2^(i-1)Next信息技术六、完整代码舒城县春秋乡中心学校2024/1/27信息技术三、课堂小结For…next循环

什么是循环结构及说明

For…Next循环结构的语句格式及说明：For<循环变量>=<初值>

To<终值>[Step<步长>]<循环体>Next<循环变量>For…Next循环结构的运用舒城县春秋乡中心学校2024/1/27信息技术四、当堂训练填空完成程序：问：鸡兔同笼，共有100条腿，40个头，问鸡有几只，兔有几只?单击窗体后，在窗体上显示结果。PrivateSubForm_Click()DimJiAsInteger'Ji变量表示鸡的个数DimTuAsInteger'Tu变量表示兔的个数DimLegAsInteger'Leg变量表示腿数ForJi=1To40Tu=

'计算腿数Leg=

+Tu*4IfLeg=

Then'如果腿正好100只，则打印Print"鸡=";Ji;"只","兔=";Tu;"只"EndIfNextJiEndSub10040-jiJi*2舒城县春秋乡中心学校2024/1/27信息技术五、课后作业一、编程计算s=1*2+2*3+…..+n*(n+1)二、猴子吃桃，每天吃当天桃子的一半多一个，第十天只有一个，编程计算共有多少个桃？三、程序填空：使得当单击"计算1+2+3+…+100"按钮后，文本框Text1显示1+2+3+…+100的值。PrivateSubCommand1_Click(