123__循环语句1_第1页
123__循环语句1_第2页
123__循环语句1_第3页
123__循环语句1_第4页
123__循环语句1_第5页
已阅读5页,还剩19页未读 继续免费阅读

下载本文档

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

文档简介

1、1.2.3循环语句 循环结构循环结构在一些算法中,经常会出现从某处开始,按照一定的条件,在一些算法中,经常会出现从某处开始,按照一定的条件,反复执行某些步骤的情况,这就是循环结构。反复执行的反复执行某些步骤的情况,这就是循环结构。反复执行的步骤称为循环体。步骤称为循环体。循环结构有以下两种结构:循环结构有以下两种结构:直到型循环结构直到型循环结构当型循环结构当型循环结构直到型循环直到型循环DO 循环体循环体LOOP UNTIL 条件条件满足条件?满足条件?循环体循环体否否是是设计一个计算设计一个计算 的值的程序的值的程序123100框图:框图:结束输出Si=1,S=0开始S= S+i i= i

2、+1i100?否是i=1S=0DO S=S+i i=i+1PRINT SEND程序:程序:LOOP UNTIL i100WHILE 条件条件 循环体循环体WEND当型循环当型循环满足条件?满足条件?循环体循环体否否是是设计一个计算设计一个计算 的值的程序的值的程序123100框图:框图:i=1S=0WHILE i=100 S=S+i i=i+1PRINT SEND程序:程序:WEND结束S= S+i i= i+1i11?结束结束YN算法步骤:算法步骤: 第一步,输入自变量第一步,输入自变量x的值的值第二步,计算第二步,计算第三步,输出第三步,输出y第四步,记录输入次数第四步,记录输入次数第五步

3、,判断输入的次数是第五步,判断输入的次数是 否大于否大于11.若是,则若是,则 结束算法;否则,结束算法;否则, 返回第一步返回第一步开始开始n=1输入输入x3232430y xxx 输入输入yn=n+1n11?结束结束YNn=1DOINPUT xy=x3+3*x2-24*x+30PRINT yn=n+1L00P UNTIL n11END( ) 0?f m 否否是是否否输入输入2( )2f xx输出输出m开始开始结束结束dba,2bam?0)()(mfafmb ma 或dba是是n不是质数不是质数n是质数是质数r=0?否否是是结束结束输入输入ni=2开始开始i=n 或或r=0?否否求求n除以的

4、除以的i余数余数i的值增加的值增加1,仍仍用用i表示表示是是质数的判定程序框图:质数的判定程序框图:P32.1判定质数的程序:判定质数的程序:INPUT “n=“;ni=2DO r=n MOD i i=i+1LOOP UNTIL in-1 OR r=0IF r=0 THEN PRINT “n不是质数不是质数”ELSE PRINT “n是质数是质数”END IFEND P32.2分析分析:第一步第一步,1!=1*1 第二步第二步,2!=1!*2 第第3步步,3!=2!*3 第第i步步,i!=(i-1)!*i 程序程序: INPUT “n=“;n i=1 t=1 WHILE i =n t=t*i

5、i=i+1 WEND PRINT “n!=”;t ENDP33B22002底底 2003 2004 2007 2008底底 10001.510001.52 10001.57i=1a=1000WHILE i =7 a=a*1.5 i=i+1WENDPRINT aEND10001.53程序程序:练习练习: 某高中男子体育小组的某高中男子体育小组的50m跑成绩跑成绩(单位单位:s)为为: 6.4, 6.5, 7.0, 6.8,7.1,7.3, 6.9,7.4,7.5设计一个算法设计一个算法,从这些成绩中搜索出小于从这些成绩中搜索出小于6.8s的成绩的成绩,并画出程序框图并画出程序框图.开始开始输入输

6、入rr6.8?输出输出r结束结束是是否否问题问题:能否对这个程序进行改进能否对这个程序进行改进,使使其输入其输入9个数后程序才结束个数后程序才结束?P21.B.2开始开始输入输入rr9?是是否否框图框图:程序程序:i=1DO INPUT “输入成绩输入成绩:”;ri=i+1LOOP UNTIL n9ENDIF r 6.8 THEN PRINT r END IFP33习题1.22.INPUT a,b,h p=a+b s=p*h/2 PRINT s END3.INPUT n i=1 sum=0 WHILE i=n sum=sum+(i+1)/i i=i+1 WEND PRINT sum END1.

7、INPUT”a1,b1,c1=”;a1,b1,c1 INPUT “a2,b2,c2=”;a2,b2,c2 d=a1*b2-a2*b1 IF d0 THEN x=(b2*c1-b1*c2)/d y=(a1*c2-a2*c1)/d PRINT “x=,y=”;x,y ELSE PRINT “please input again.” EDN IF END2. n=1 p=1000 WHIEL n=7 p=p*(1+0.5) n=n+1 WEND PRINT p END3.INPUT”x=”;x IF x1 THEN y=x ELSE IF x10 THEN y=2*x-1 ELSE y=3*x-11 END IF END IF P

温馨提示

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

评论

0/150

提交评论