VB实验四:循环结构应用与算法实现.pdfVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多

VB实验四循环结构

【实验目的】

1.For—NEXT循环结构

2.DO—LOOP循环结构

【复习】

For循环语句(一般用于循环次数已知):

For循环变量=初值to终值[Step步长]

语句块

[ExitFor]

语句块

Next[循环变量]

DOWHILE—LOOP循环语句(一般用于循环次数未知):

DoWhile条件表达式

语句块

[ExitDo]

语句块

Loop

【实验内容】

1.求表达式1!+2!+…+10!的值。

2.设一厚0.5mm,面积足够大,将这对折多少次后,其厚度可

达到(珠穆朗玛峰)8848m,编程计算对折次数。

3.求所有三位数的水仙花数,所谓水仙花数,是指一个3位数,其各

位数字立方和等于该数字本身。例如,153是水仙花数,因为

153=13+53+33。可以用三重循环或者一重循环实现。可参考例3.12。

22

x+y=10000

x≤y共有多少组自然数解(注意自然数包含0)

4.计算不定方程

5求两自然数m、n的最大公约数和最小公倍数。

VBExperiment4Loop

Structure

【Purposeofexperiment】

1.For—NEXTloopstructure

2.DO—LOOPloopstructure

【复】习Forloopstatement(generallyusedforloopingwitha

knownnumberoftimes):Forloopvariable=initialvalueto

finalvalue[Stepstep]statementblock[ExitFor]statement

blockNext[loopvariable]DOWHILE—LOOPloopstatement

(generallyusedwithanunknownnumberofloops):

DoWhileConditional

ExpressionStatement

Block[ExitDo]StatementBlock

Loop

【Experimental

content】

1.Findthevalueoftheexpression1!+2!+...+10!.2.Assumethatthethicknessofa

pieceofpaperis0.5mmandtheareaislargeenough.Afterfoldingthepaperinhalf

anumberoftimes,itsthicknesscanreach(MountEverest)8848m.Programto

calculatethenumberoffolds.

3.Findthenarcissusnumberofallthreedigits.Theso-calleddaffodilnumberrefers

toa3-digitnumber,thesumofthecubesofeachdigitisequaltothenumberitself.

Forexample,153isthenumberofdaffodilsbecause153=13+53+33.Thiscanbe

achievedusingatriplelooporasingleloop.PleaserefertoExample3.12.

文档评论(0)

187****4471 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档