欢迎来到天天文库
浏览记录
ID:52122474
大小:811.00 KB
页数:177页
时间:2020-04-01
《循环结构(又称为重复结构).ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、循环结构(又称为重复结构)在这种结构中,按给定的条件连续重复多次执行A框中的一组算法步骤。A框称为循环体。一般来说,循环结构有二种:当循环和直到循环。当循环结构的特点:当条件成立时,重复执行循环体;当条件不成立时,不执行循环体并立即退出循环。直到循环的特点是:重复执行循环体,直到条件成立时退出循环。条件A框是否当循环A框条件否是直到循环当循环结构中,循环体可能一次都没执行;而直到循环的循环体至少被执行一次。计算12个实验数据的平均值开始输入实验数据at=t+an=n+1输出t/12的值结束计数器变量n赋初值0实验数据总和变量t赋初值0N
2、>=12否是一、用For-----Next语句实现循环结构预先能确定重复次数的循环问题可以使用For-----Next来实现.FOR---NEXT语句的一般格式是:For<循环变量>=<初值>To<终值>Step<步长><循环体>Next<循环变量>FOR---NEXT语句的执行过程是:1.对循环变量设置初值。2.判断循环变量的值是否大于终值,若大于,则退出循环,否则,执行循环体。3.执行循环体后,循环变量的值增加一个步长的值,再执行上述步骤2。计算1+2+3+…10的值t=0Fori=1To10t=t+iNextiPrint"
3、t=";t计算1+3+5+7+9的值t=0Fori=1To10Step2t=t+iNextiPrintt计算2+4+6+8+10的值t=0Fori=2To10Step2t=t+iNextiPrintt计算1+3+5+7+…前20项的值t=0Fori=1To40Step2t=t+iNextiPrintt计算10+9+8+…1的值s=0Fori=10To1Step-1s=s+iNextiPrints计算1+1/2+1/3+…1/10的值s=0Fori=1To10s=s+1/iNextiPrints计算
4、1/2+1/22+1/23…1/2100的值s=0Fori=1To100s=s+1/2^iNextiPrints方法一:s=0M=1ForI=1To100s=s+MNextIs=0M=1ForI=1To100M=M/2s=s+MNextI方法二:计算12个输入数据的平均值开始输入实验数据at=t+an=n+1输出t/12的值结束计数器变量n赋初值0实验数据总和变量t赋初值0N>=12否是s=0Fori=1To12inputas=s+aNextiPrints/12画圆形Circle(500,800),100,RGB
5、(255,0,0)题目:画10个同心圆Fori=100To1000Step100Circle(1800,1500),i,RGB(255,0,0)Nexti计算s=1*2*3*4*…1010!s=1Fori=1To10s=s*iNextiPrints输入数字n,计算n!Inputns=1Fori=1Tons=s*iNextiprints计算s=1-2+3-4+5-6+7-8+9-10s=0t=1Fori=1To10s=s+t*i—————NextiPrintss=0t=1Fori=1To10s=s+t*it=-t
6、NextiPrints求1-1/21+1/31-1/41+…….+1/91-1/101s=___t=1Fori=21To101Step10_____t=-ts=s+t*aNextiPrintss=1t=1Fori=21To101Step10a=1/it=-ts=s+t*aNextiPrints填数3_*8256=_3*6528Fori=1To9If(30+i)*8256=(i*10+3)*6528ThenPrintiEndIfNexti统计200以内37的倍数有几个?并把符合要求的数字输出。c=0
7、Fori=1To200IfiMod37=0Thenc=c+1PrintiEndIfNextiPrintc若一个三位数x=100a+10b+c(a,b,c都是个为数),满足a^3+b^3+c^3=x,则x称为水仙花数,找出所有的水仙花数。Forn=100To999a=Int(n/100)b=Int((n-100*a)/10)c=nMod10Ifa^3+b^3+c^3=nThenPrintnNextn有一个五位数字组成的编号1__47,千位和百位不知,但是这个五位数是57或67的倍数,输出所有满足这些条件的五位数,并
8、统计这样数的个数。分析10047=10047+0=10047+0*10010147=10047+100=10047+1*10010247=10047+200=10047+2*10010347=10047+3
此文档下载收益归作者所有