2.4程序的循环结构-for循环.ppt_第1页
2.4程序的循环结构-for循环.ppt_第2页
2.4程序的循环结构-for循环.ppt_第3页
2.4程序的循环结构-for循环.ppt_第4页
2.4程序的循环结构-for循环.ppt_第5页
已阅读5页,还剩10页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

FOR循环语句,输出1至10之间所有整数的平方根,PrivateSubCommand1_Click()Form1.ClsPrint1,Sqr(1)Print2,Sqr(2)Print3,Sqr(3)Print4,Sqr(4)Print5,Sqr(5)Print6,Sqr(6)Print7,Sqr(7)Print8,Sqr(8)Print9,Sqr(9)Print10,Sqr(10)EndSub,如果要输出110000之间所有整数的平方根,程序要怎么写?,输出1至1000之间所有整数的平方根,PrivateSubCommand1_Click()Form1.ClsPrint1,Sqr(1)Print2,Sqr(2)Print3,Sqr(3)Print4,Sqr(4)Print5,Sqr(5)Print6,Sqr(6)Print7,Sqr(7)Print8,Sqr(8)Print9,Sqr(9)Print10,Sqr(10)EndSub,PrivateSubCommand1_Click()Form1.ClsFori=1to1000step1Printi,Sqr(i)NextiEndSub,FOR循环的格式,For循环变量=初值to终值step步长语句组(循环体)Next循环变量例如:Fori=1to100step1printiNexti,For循环的执行过程,演示:单步运行与监视窗口变量值查看,For语句的循环特点,控制循环体执行多次循环变量在每次循环执行的结束时自动修改,阅读程序写结果,ForA=1to100printANextA,S=1ForA=1to10S=s*ANextA,ForA=100to1step-1s=s+ANextA,ForA=1to10A=A+1printANextA,for循环解题的关键,找出问题中重复部分重复做的事情是什么?,求s=1+2+100的值,S=0S=s+1S=s+2S=s+100,S=0Fori=1to100s=s+INexti,要求24.+100的值,应该要如何修改以上程序?,重复部分,重复做:把I累加到S。,作业1,任务1:输出1-100之间所有完全平方数(完全平方数是这样一种数:它可以写成一个正整数的平方。例如,36是66,49是77)。,作业2,任务2:编一个程序,输入N(N10),求N!12N的值。,求所有水仙花数,如果一个三位数,它的每位数字的立方和等于这个三位数,则称它为水仙花数。例如:153135333,所以153是一个水仙花数。,人工找出水仙花的过程,100是水仙花数?101是水仙花数?999是水仙花数?,求所有水仙花数算法,开始,I1000?,结束,是,否,I100,求出I的个位a,十位b和个位c,a3+b3+c3=I?,是,输出I,II+1,循环结构,求水仙花数的程序,DimIasinteger,aasinteger,basinteger,casintegerFori=100to999a=i100b

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论