《循环结构》ppt课件

《《循环结构》ppt课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第四节循环结构(3)安阳一中李永恒教学目标1、掌握do..loop语句的使用方法。2、完成活动四及体验活动引言前面学习的用for…next语句实现循环,循环的次数都是事先知道的,而在现实生活中有很多重复操作的次数大都不是事先就知道的,这种情况下就要用另外的语句来实现循环,这就是今天咱们要学习的do..loop语句.学习指引DO…LOOP语句DoWhile条件语句块Loop形式1：DoWhile/Until…Loopi=1s=1Dowhilei<=50s=s*ii=i+1Loop格式流程图代码举例p1语句块1是否DoUntil条件语句

2、块Loopi=1s=1Dountili>50s=s*ii=i+1Loopp2语句2否是学习指引DO…LOOP语句Do语句块LoopWhile条件形式2：Do…LoopWhile/Untili=1s=1Dos=s*ii=i+1Loopwhilei<=50格式流程图代码举例p1语句块1是否Do语句块LoopUntil条件i=1s=1Dos=s*ii=i+1Loopuntili>50p2语句块2否是学习指引DO…LOOP语句通过对Do…Loop语句以上几种形式的比较，我们总结如下：在以上两种形式的比较中，我们发现while和until的区

3、别仅仅是循环条件相反，通过修改循环条件，它们之间可以互相转化，所以在实际应用中，我们习惯上经常使用Dowhile…Loop和Do…LoopUntil两种形式，即“当结构”和“直到结构”。使用“当结构”，即当满足循环条件才执行循环体；使用“直到结构”，即直到满足条件才退出循环，循环体至少执行一次，而“当结构”中，若不满足条件，可能循环体一次也不执行；使用Do…Loop语句需要注意循环体中一定要有修改循环控制条件的语句，否则一旦进入循环体就无法结束循环，陷入死循环。活动四用DO…LOOP语句实现循环结构问题：小明的爸爸决定对某种电脑进行

4、促销。促销方案为：买第一台电脑时需付全价6400元，买第二台时只需付全价的95%，依此类推，买后一台电脑的价格是前一台的95%，但是最低价不得低于3800元，如果低于3800元就按3800元的价格购买。有一位顾客需要为单位购置电脑，他计划购买电脑的费用是50000元，求该顾客最多能买几台电脑，需付多少钱。1.问题分析。本问题的解决思路是：一、每买一台电脑，需要计算这台电脑的价格，然后累加到总金额上，当总金额超过50000元时就停止循环。因此，本循环过程中的重复操作是计算电脑的单价及总金额。二、在计算电脑的单价时，还需要做一个判断：如

5、果打折后的价格大于3800元，那么在前一次价格的基础上打折，折扣率为95%，否则价格即为3800元，不再打折，此后的折扣率可看作为100%。设电脑的价格为p，折扣率为m，购买电脑的台数为n，购买电脑的总金额为s。折扣率m的值需要根据前一台电脑的价格p来确定。如果p>3800，那么m=__________；否则___________。根据促销方案，购买某台电脑的价格是在前一台的价格上再打折，可采用累乘的方式计算某台电脑的价格。计算公式为p=p*_________。采用累加的方式，购买电脑总金额的计算公式为s=s+__________。

6、2.算法设计算法1令p=6400；令n=1；令m=0.95；s=p；如果s<=50000，则执行第6步，否则执行第10步；p=p*m；如果p<3800，则p=3800，m=1；s=s+p；n=n+1，转第5步执行；输出n和s；结束。算法2令p=6400；令n=1；令m=0.95；s=p；如果s<=50000，则执行第6步，否则执行第10步；p=p*m；如果p<3800，则p=3800，m=1；s=s+p；n=n+1，转第5步执行；n=n-1；s=s-p；输出n和s；结束。讨论：参照教材83页的问题，讨论这两种算法的正确性。1)、两个

7、算法求出的s是大于50000,还是小于等于50000?哪个算法的输出结果正确?为什么?2）、如果将算法1第5步中控制循环的条件s<=50000改为s+p*m<=50000,该算法的运行结果正确吗?为什么?3）、能否将算法1或算法2中的第6步和第7步互换位置?为什么?完成流程图开始n=1，p=6400，m=0.95，s=ps+p*m<=50000输出最多能购买电脑的台数n及总金额s结束否是完成流程图开始n=1，p=6400，m=0.95，s=ps+p*m<=50000p=p*mp<3800p=3800m=1s=s+pn=n+1输出最多

8、能购买电脑的台数n及总金额s结束否是是否3、实现应用程序PrivateSubForm_Click()DimsAsSingle,mAsSingle,pAsSingleDimnAsIntegern=1p=6400m=0.95s=pDoWh