7.走进程序世界 (2)

在一定的条件下，不断重复同样的的操作。,某个固定位置上的工人劳动，有什么共同特点？,信息技术,舒城县春秋乡中心学校,二、循环结构流程图表示,在实际生活、学习过程中，有哪些循环结构的例子？,交通信号灯,四季更替,1,信息技术,舒城县春秋乡中心学校,走进程序世界编程解决问题-Fornext循环舒城县春秋乡中心学校詹耀华,第三单元加工信息,信息技术,信息技术九年级下册科学出版社,舒城县春秋乡中心学校,学习目标,一、了解什么是循环结构,二、理解ForNext循环结构的语句格式,三、掌握ForNext循环结构的基本运用,舒城县春秋乡中心学校,课前自主学习检测,一、将ForNext循环结构补充完整ForToStep.Next.,=,二、ForNext循环结构的三大要素1、.2、.3、.,舒城县春秋乡中心学校,PrivateSubCommand1_Click()i=1Printi;i=i+1Printi;i=i+1Printi;i=i+1Printi;i=i+1Printi;i=i+1Printi;,1、,运行结果：12345678910,i=i+1Printi;i=i+1Printi;i=i+1Printi;i=i+1PrintiEndSub,比一比,如果我们需要在窗体上输出更多的1，几十个甚至上百个那要怎么办呢？,阅读如下程序代码：在窗体显示1到10之间所有自然数。,比一比,舒城县春秋乡中心学校,PrivateSubCommand2_Click()Fori=1To10Step1Printi;NextiEndSub,2、,运行结果：12345678910,阅读如下程序代码：在窗体显示1到10之间所有自然数。,信息技术,舒城县春秋乡中心学校,对比演示,信息技术,舒城县春秋乡中心学校,在窗体显示1到10之间所有自然数。,(1)把初值赋给循环变量。,(2)检查“循环变量”的值是否超过终值。,(3)如果不超过,就执行一次“循环体”，然后把“循环变量+步长”赋给“循环变量”然后返回判断。,(4)如果超过就停止执行“循环体”，跳出循环，执行“Next”后面的语句。,循环结构是指程序重复执行循环语句中的一行或多行代码，重复执行的程序块称为“循环体”，使用循环可以避免重复不必要的操作，简化程序，节约内存，提高效率。循环结构三要素是循环变量、循环体和循环终止条件。,一、什么是循环结构？,信息技术,舒城县春秋乡中心学校,For=ToStepNext,注意：1、在For循环语句中，For和Next是一对语句，必须成对出现，缺一不可。2、Step可以省略，这时步长默认为“1”。,思考：循环变量的增量即步长，能否为0？如果为0，程序的运行结果怎样？,二、ForNext循环结构的语句格式,信息技术,舒城县春秋乡中心学校,注意：在ForNext循环体中，循环体变量的初值和终值都是数值型。,在此循环结构中，_是循环变量，_是初值，_是终值，“sum=sum+i”是_。在步长为2的情况下，共执行_次“sum=sum+i”语句。,i,1,50,循环体,25,For循环变量=初值To终值Step步长循环体Next循环变量,步长是1可以省略不写,二、ForNext循环结构的语句格式,信息技术,舒城县春秋乡中心学校,计算题：用三分钟的时间计算的值。,任务一：试着计算分数相加总和,信息技术,舒城县春秋乡中心学校,计算的值,信息技术,舒城县春秋乡中心学校,PrivateSubCommand1_Click()DimsAsSingle,iAsInteger,nAsIntegers=0n=Val(Text1.Text)Text2.Text=Str(s)EndSub,设：s是分数的总和i是循环变量初值是_终值是_步长是_循环体是_,1,1,s=s+1/i,Fori=1tons=s+1/iNexti,n,信息技术,舒城县春秋乡中心学校,在印度有一个古老的传说，国王打算奖赏发明了国际象棋的大臣，国王问他想要什么，他对国王说，陛下，我只要些麦粒，请您在这张棋盘的第1个小格放1粒麦子，第2个小格放2粒，第3小格放4粒，第4小格放8粒以此类推，把64格棋盘放满就行了，国王觉得这个要求太容易满足了，就答应给他这些麦粒。当人们把一袋一袋的麦子搬来开始计数时，国王才发现，就算把全印度甚至全世界的麦粒都拿来，也满足不了他的要求那么，那位大臣要求得到的麦粒到底有多少呢？,任务二：计算棋盘上的麦粒总数,棋盘上的麦粒,信息技术,舒城县春秋乡中心学校,一、任务分析,2(i-1),S+2(i-1),棋盘的第一格放1粒麦粒，第二格放2粒麦粒，第三格放4粒麦粒，第四格放8粒麦粒，即后面一格的麦粒数是前一格的2倍以此类推，请问第n格时整个棋盘上的麦粒总数是多少？,信息技术,舒城县春秋乡中心学校,二、流程图,信息技术,舒城县春秋乡中心学校,三、程序界面,n=Val()Text2.Text=Str(),Text1.Text,S,Text1,Text2,信息技术,三、界面及说明,舒城县春秋乡中心学校,信息技术,四、演示,舒城县春秋乡中心学校,四、完成代码输入,For循环变量=初值To终值Step步长（步长1可以省略）循环体Next循环变量,循环变量：i,初值：1,终值：n,步长：1,循环体：s=s+2(i-1),信息技术,五、循环结构分析,舒城县春秋乡中心学校,PrivateSubCommand1_Click()DimnAsInteger,iAsInteger,sAsDoublen=Val(Text1.Text)Text2.Text=Str(s)EndSub,Fori=1Tons=s+2(i-1)Nexti,六、完整代码,舒城县春秋乡中心学校,三、课堂小结,Fornext循环,什么是循环结构及说明,ForNext循环结构的语句格式及说明：For=ToStepNext,ForNext循环结构的运用,舒城县春秋乡中心学校,四、当堂训练,填空完成程序：问：鸡兔同笼，共有100条腿，40个头，问鸡有几只，兔有几只?单击窗体后，在窗体上显示结果。PrivateSubForm_Click()DimJiAsIntegerJi变量表示鸡的个数DimTuAsIntegerTu变量表示兔的个数DimLegAsIntegerLeg变量表示腿数ForJi=1To40Tu=.计算腿数Leg=+Tu*4IfLeg=Then如果腿正好100只，则打印Print鸡=;Ji;只,兔=;Tu;只EndIfNextJiEndSub,100,40-ji,Ji*2,舒城县春秋乡中心学校,五、课后作业,一、编程计算s=1*2+2*3+.+n*(n+1),二、猴子吃桃，每天吃当天桃子的一半多一个，第十天只有一个，计算共有多少个？,三、程序填空：使得当单击计算1+2+3+100按钮后，文本