实现循环结构的语句 (2).ppt

《实现循环结构的语句 (2).ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

第四节循环结构信息技术组向小玲 循环即重复。800米：1500米：3000米：5000米：2圈3圈又300米7.5圈12.5圈以径赛为例，如果参加中长跑，重复做的事就是沿着运动场“跑”。 在中长跑的径赛中，需要哪些工作（裁判）人员？记圈数的人记秒数的人800米：1500米：3000米：5000米：2圈3圈又300米7.5圈12.5圈(循环变量)(运算结果)1圈，2圈1圈，2圈，3圈，300米1圈，2圈，3圈，…，7圈，200米1圈，2圈，3圈，…，12圈，200米终值初值 循环结构——For…Next语句语句格式：For循环控制变量=初值To终值[Step步长]循环体语句块（循环体）Next[循环控制变量]说明：1、循环变量必须为数值型。2、当步长为正时，初值终值，反之初值终值；步长缺省时为。条件表达式成立？循环体NoYes小于大于1 例一：编程求1～1000的和。分析问题：设js为循环变量，用来计数；Sum用于放求和后的值。1+2+3+4+5+6+7+…js=1sum=0013610152345..1000.0+1=1+2=3+3=6+4=10+5=JSSum+ 练习一：编程求1～1000的和。流程图：js<=1000Sum=sum+jsjs=js+1sum=0js=1FalseTrue PrivateSubForm_Click()DimjsAsIntegerDimsumAsDoublejs=1sum=0Forjs=1to1000step1sum=sum+jsNextjsPrint"1-1000的和为："&sumEndSub编程求1～1000的和。（代码） 例二：判断一个数是否为素数。演示分析问题：素数又称为“质数”，即只能被1和它本身整除的数。由概念可知，判断这个数时，应从___开始，到_______结束，对其中的每一个数做除法。在此范围内，若这个数能被其中的任一个数整除，则它不是素数。此后可不再对其后的数进行判断。2该数-1 DimiAsInteger,flagAsIntegerDimxAsLongx=InputBox("请输入一个数","输入")Fori=____To_____If___________Thenflag=1‘标记，为1时表示能整除，该数不是素数。ExitForEndIfNexti（代码）演示练习二：判断一个数是否为素数。2x-1xmodi=0 Ifflag=1ThenPrintx&"不是一个素数"Elsepritnx&"是一个素数"EndIfEndsub（代码续上） 课堂练习编程求20以内偶数的阶乘（2*4*6*…*20）。PrivateSubForm_Click()DimiAs_____DimjcAs_____i=_____jc=_____Fori=____to_____step___jc=______NextiPrint"2*4*8…*20="&____EndSub