




已阅读5页,还剩8页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
,第四节循环结构,四川省旺苍东城中学吴昕鸿,循环即重复。,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米,终值,初值,循环结构ForNext语句,语句格式:For循环控制变量=初值To终值Step步长循环体语句块Next循环控制变量,说明:1、循环变量必须为数值型。2、当步长为正时,初值终值,反之初值终值;步长缺省时为。,小于,大于,1,练习一:编程求11000的和。,分析问题:设i为循环变量,用来计数;sum用于放求和后的值。,1+2+3+4+5+6+7+,i=,1,sum=,0,0,2,3,4,5,.,.,1000,.,0+1=,1+2=,3+3=,6+4=,10+5=,i,sum+,练习一:编程求11000的和。,流程图:,i=1000,sum=sum+i,i=i+1,sum=0,i=1,False,True,PrivateSubForm_Click()DimiAsIntegerDimsumAsDoublesum=0Fori=1to1000step1sum=sum+iNextiPrint1-1000的和为:&sumEndSub,编程求11000的和。,(代码),练习二:判断一个数是否为素数。,演示,分析问题:素数又称为“质数”,即只能被1和它本身整除的数。,由概念可知,判断这个数时,应从_开始,到_结束,对其中的每一个数做除法。在此范围内,若这个数能被其中的任一个数整除,则它不是素数。此后可不再对其后的数进行判断。,2,该数-1,DimiAsInteger,flagAsIntegerDimxAsLongx=InputBox(请输入一个数,输入)Fori=_To_If_Thenflag=1标记,为1时表示能整除,该数不是素数。ExitForEndIfNexti,(代码),演示,练习二:判断一个数是否为素数。,2,x-1,xmodi=0,Ifflag=1ThenPrintx&不是一个素数Elsepritnx&是一个素数EndIfEndsub,(代码续上),课堂练习,编程求20以内偶数的阶乘(2*4*6*20)。PrivateSubForm_Click()DimiAs_Dim
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 生态农业观光园土地租赁承包经营合同
- 跨区域商业项目委托运营管理与市场拓展合同
- 二手豪华车赠与及检验合同范本
- 充电桩设施建设与能源优化利用合同合同范本
- 环保型车间承包管理标准合同范本
- 成都房产交易资金托管合同
- 机动车抵押贷款风险评估合同
- 合同中关于保密协议书
- 消防多媒体课件
- 合作合同协议书范本7篇
- 精装分包劳务合同协议书
- 2025-2030中国酸奶冰淇淋市场需求前景预测及投资效益盈利性研究报告
- 2025年高考英语应用文第09讲 读后续写分话题万能结尾满分句(讲义)
- 图像编辑基础Photoshop试题及答案
- 新媒体国企面试题及答案
- 宝宝改姓夫妻协议书
- 2021入河(海)排污口三级排查技术指南
- 央企华润集团杭州片区年度品牌传播策略案
- 2025年中考第一次模拟考试卷:地理(陕西卷)(解析版)
- 《社区公园》课件
- 2025年中考语文作文心理健康主题作文高分模板(分步详解+例文示范)
评论
0/150
提交评论