资源描述：
《fortran实验七循环结构序程序设计（二）》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、实验七循环结构序程序设计（二〉循环结构是用于解决重复计算和重复处理问题的一类程序结构。在实验六中已经学习了循环结构的基本概念，以及DO循坏语句和DOWHTLE循坏语句的基本功能和使用规则，但这仅是循环结构的基本内容，述需要学习和掌握循环结构的综合应用，以及更复杂的循环结构,用于解决更复杂的问题。循环结构允许嵌套，嵌套的循环结构称为多重循环，即一个循环结构的循环体中包含另一个循环结构，根据实际需要可使用多层嵌套oF0RTRAN90新增了强制性终止循环语句CYCLE和EXIT,使用这两条语句可在循环体执行过程中提前终止本次循环或者
2、整个循环。这两条语句的使用虽然不符合结构化程序设计思想，但使用得当，可使用程序简洁、短小、高效。木次实验是学习和掌握循环结构的综合应用的一次实系统验活动。通过本次实验，能够设计和编写比较复杂的循环结构程序。一.实验目的1.进一步掌握“计数型”和“条件型”循环结构的使用。2.掌握强制性终止循坏语句EXIT和CYCLE的基本功能和使用规则，以及相互区别。3.掌握嵌套循环结构概念和应用。4.常握顺序结构、选择结构和循环结构相互嵌套和综合应用。5.掌握设计和编写较复杂程序的基本技能。二.实验内容11.问题描述公元五世纪末，我国古代数学
3、家张丘建在《算经》屮提出了“百钱买百鸡问题“鸡翁一,值钱五；鸡母一，值钱三；鸡雏三，值钱一。百钱买百鸡，问公鸡、母鸡、小鸡各几何？”意思是：公鸡每只5元，母鸡每只3元，小鸡一元三只。100元买100只鸡。公鸡、母鸡、小鸡各买多少只？编写程序实现之。2.算法设计求解本题，有两个限定条件：其一是所有的鸡共计100只；其二是所有买鸡的钱共计100元。根据这两个条件可列出下面两个方程式：（设公鸡、母鸡和小鸡数分别为X、y、z）*x+y+z=100.5x+3y+z/3=100这是三元一次方程组，其限定条件方程式只有两个，这就意味着它是一
4、个多解题，有多个答案。求解该问题，有多种解法，可采用试探法求解该问题。公鸡、母鸡和小鸡数各用0、1、2、3、…、100去试探是否满足上述方程组,共需试探101x101x101=1030301次。用三重循环结构设计算法和编写程序，通过分析，设计算法，绘制框图，如图7-1所示。每层循环的循环次数确定，都是101次，所以用“计数型”循环结构实现，程序中使用DO循坏语句。中间层mid最内层in最外层out1.程序编写设计和编写程序如下（不完整，请在下划线空白处填充正确内容）:!班级：？?？!姓名：？?？!日期：???!求解15钱买15
5、鸡问题PROGRAMproblemOlINTEGER::x,y,z,n=0,sumREALmoneyDOx=0,100DOy二0,100DOz=0,100sum=100money=100IF(sum==x+y+z.AND.5*x+3*y+z/3.0==money)THENn=n+lWRITE(*,100)n,x,y,zENDIFENDDOENDDOENDDO100FORMAT(IX,'第',12,'组解:’,'公鸡二',12,'只',2X,'母鸡/,12,'只',2X,'小鸡二',12,'只')PRINT*,'共有',n,'组
6、解。'END1.实验要求•分析问题，理解算法和程序，将程序填写完整。•掌握“计数型”循环结构、D0循环语句、循环嵌套关系。•在D盘上创建新工作区:shiyan07和新项目：xm71。•在项目xm71内创建源程序文件:xm71.f90,同时在文件中编辑输入给定程序。•在项目xm71内编译、构建、运行、调试程序。•将输出结果以注释形式编辑输入到源程序文件xm71.f90末尾。•改写程序，提高通用性(总钱数和总鸡数从键盘输入,方程系数通过PARAMETER语句定义)。运行输入几组不同数据，获得不同运行结果。•改写程序，捉高运行效率(
7、减少内循坏体中money计算和块TF语句执行次数)。提示:块IF语句在x+y+z二100时执行才有意义。提示：在in循环体中增加语句“IF(sumOlOO)CYCLE”。2.实验步骤•分析问题，理解框图和程序，完成程序填空，得到正确完整程序。•启动软件开发环境MicrosoftDeveloperStudio<>•在D盘上创建新工作区：shiyan07o•在工作区shiyan07内创建新项目:xm710•在项目xm71内创建源程序文件xm71.f90,编辑输入源程序文本。•编译、构建、运行、调试程序。得到输出结果。•将输出结果以
8、注释形式编辑输入到源程序文件末尾。•在工作区shiyan07内创建新项目：xm711,在新项冃内创建源程序文件xm711.f90,在文件中编辑输入已改写的通用程序。编译、构建、运行、调试程序。输入自定的儿组数据,获得输出结果。一.实验内容21.问题描述验证哥德巴赫猜想。哥德巴
