高中信息技术《循环结构程序》设计

循环结构程序设计,For/next语句,计数式循环循环语句的简单应用：画圆、数列求和,学习目标：,1、了解循环结构，理解for/next计数式的循环语句格式、功能；2、掌握循环语句的执行过程；循环变量的作用3、了解画圆及颜色变化的命令，能够利用for/next命令完成多彩同心圆的设计任务。4、掌握简单的数列求和运算,学习过程：,问题1：能否用程序设计画圆?画几个圆问题2：能否用程序设计快速画多个同心圆问题3：计算有规律的自然数的和以上都是本节课所要解决的问题和需要学习的相关知识。观看,循环结构,阅读下列程序：（1）a=5:y=10y=y+a此时y变量值是多少？（2）a=5:y=0y=y+a：y=y+ay=y+a:y=y+ay=y+aprinty此时y变量值是多少：,a=5:y=0Forx=1to5step1y=y+anextxprinty该程序功能与（2）作用相同，重复执行：将y值加a再赋值给y,for/next语句结构,For循环变量=循环的初值To终值step步长语句组（循环体）Next循环变量理解：forx=1to10step2y=y+xnextxtext1.text=y,for/next语句执行过程,循环变量=初值，记录终值、步长,变量终值,循环体,循环变量=循环变量+步长,结束循环,false,true,探究学习,阅读或动手试一试，写出下列程序运行结果并回答问题：(1)Fori=1to6step1printI,nextI(2)fori=10do1step-2printI,nextI(3)s=0forx=1to15step2s=s+xnextxprints,思考问题,(1)for循环控制变量与next变量关系(2)初值、终值、步长之间的关系？(3)循环次数如何计算？,问题解答,（1）for变量与next变量必须一致（2）初值小于等于终值，步长为正，初值大于终值，步长为负(3)循环次数：int(终值-初值)/步长)+1,循环应用：例题1：画多个同心圆,画圆命令,画圆命令:Circle(x,y),r颜色命令:RGB(red,green,blue)red、green、blue：0255的整数，各颜色饱和程度。如：RGB(0,0,0)表示黑色；RGB(255,255,255)表示白色；随机色:RGB(Rnd*255,Rnd*255,Rnd*255),画圆的命令:Circle(3000,3000),2000,RGB(Rnd*255,Rnd*255,Rnd*255),问题分析：,1、由按钮的单击事件产生同心圆2、窗体属性设置：（1）窗体的FillStyle属性设置：shape图形的填充样式设置:空心、实心、其它线条,填充样式,FillStyle属性可设置为0，1，2（水平直线）、3（垂直直线）、4（上斜对角线）、5（下斜对角线）、6（十字线）、7（交叉对角线）。,前景色生成：,窗体的FillColor属性FillColor可以用来填充由Circle和Line图形方法生成的圆和方框。缺省情况下，FillColor设置为0（黑色）。,想一想，如下命令的含义：Circle(2000,1500),1000,RGB(rnd*255,rnd*255,rnd*255)20个圆心相同，而半径有规律变化的圆如何画？,完成代码编写：（空心圆）,PrivateSubForm_Click()Fori=1To15Circle(3000,2000),1600-100*I，RGB(RND*255,RND*255,RND*255)NextiEndSub这里圆可以从外画到内，也可以从内画到外,forI=1to15step1Form1.FillColor=RGB(Rnd*255,Rnd*255,Rnd*255)Circle(3000,2000),1600-100*InextI注意：多个同心实心圆的半径只能从大到小，想一想为什么？,实心圆：,例题2、数列计算,(1)计算1+2+3+1000的和思考：(2)计算1*2*3*10?(3)计算1+3+5+7？(4)计算