- 1、本文档共37页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
FORTRAN95第03章-循环课件
第3章 循环程序设计
本章介绍”循环”的概念和循环程序设计方法。
通过本章的学习,应了解循环结构的基本概念
及其在程序设计中的重要性?掌握Fortran95语
言提供的各种循环程序设计所使用的语句和循
环程序的编写方法。
循环是程序设计中非常重要的概念和方法。
在编写程序时常用循环来描述有规律的重复计
算过程。
为了更方便地实现循环,FORTRAN语言提供
了专门的循环语句。
;3.1 DO循环结构
DO循环结构包括DO循环和DO WHILE循环。
3.1.1 DO循环结构的形式
DO循环结构的一般形式为:
[name:] DO [Label [,]] [loop_contral]
block
[Label] term_stmt [name]
其中:
(1)name为循环的名字,可省略不用;
(2)Label为循环终端语句的标号,可以省略,但如果使用,则DO后的该标号
必须和循环终端语句的标号一致;
(3)loop-contral是循环的控制部分,它又有三种选择,其一为i=e1,e2,[,e3];
其二为while(e);第三种情况是可以省略;三种不同的选择构成三种不同的DO
循环形式;
(4)block为循环体,即重复执行的语句部分;
(5)term-stmt为循环终端语句,该语句要以是enddo或continue语句,也可以
是允许的其他可执行语句。
以上给出的仅是DO循环结构的一般形式,下面将介绍的是具体的应用形式。
;3.1.2计数型DO循环
在设计循环结构时,如果事先可以确定循环体的重复执行次数可以采用这种形式。
一、计数型DO循环的一般形式
; do i=1,5,1
write (*,*) ”happy Birthday”, i
enddo
这段程序代码中的do循环中没有使用语句标
号,循环体中只含一个write语句, 终端语句为
enddo,循环控制变量的初值为1, 终值为5,增
量为1,可以省略。
该段程序执行时,循环体将重复执行5次,即
输出5遍“happy Birthday”和i的值。 ;二、计数型DO循环的执行
计数型DO循环的执行过程如下:
(1)当执行到这种DO语句时,先计算e1、e2、e3的值,假设分别用m1、m2、m3表示。如果m1、m2、m3的类型与循环控制变量i的类型不同,将自动按赋值规则进行类型转换;
(2)将初值m1赋给循环控制变量i???
(3)按以下公式计算循环次数N
; 计算e1、e2、e3的值
m1、m2、m3;例3.2利用计数型DO循环求n!。
程序如下:
program ex302
implicit none
integer i, n, k
k=1
read (*,*) n
do i=n, 1, -1
k=k*i
enddo
print*, ‘N!=’, k
end
程序中的循环体只有一条赋值语句k=k*i,这条语句被重复执
行n次,每次执行到达enddo语句后,i的值会自动减1,即i的值
加上增值-1。此处的do语句也可以写成do i=1,n的形式,增值
为1被省略。对于设计增值为负值的循环,控制变量的初值一
定要大于终值,否则是不能进行循环的。
; 例3.3已知 ,求x由0到2、步长为0.1
时的y值,以及y的最大值和最小值。
program ex303 ymax=y
implicit none elseif (yymin) then
real x, y, ymax, ymin ymin=y
ymax=100.0
您可能关注的文档
- 案例分析(5-6)课件.ppt
- PPT模版-Contents目录课件.ppt
- 安踏品牌战略分析课件.ppt
- 案例分析题解题技巧课件.ppt
- 宝骏汽车营销策划课件.ppt
- 案例制作顺序提示课件.ppt
- 案例讲座文字资料课件.ppt
- 案例分析题答题技巧课件.ppt
- 安全系统工程考试题课件.ppt
- 班组内部管理技巧课件.ppt
- 白天晚上教学课件.ppt
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题参考答案详解.docx
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题带答案详解.docx
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题及参考答案详解.docx
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题及参考答案详解一套.docx
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题及完整答案详解1套.docx
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题及参考答案详解1套.docx
- 2025年山东菏泽市事业单位招聘急需紧缺岗位目录(第一批)笔试模拟试题参考答案详解.docx
- 2025年山东菏泽市牡丹区中医医院引进急需紧缺专业技术人才30人笔试模拟试题及答案详解1套.docx
- 画西瓜教学课件.ppt
最近下载
- 高中物理万有引力与航天模拟专题.doc VIP
- 《教父(1972)》完整中英文对照剧本.pdf VIP
- ABB喷涂机器人生产节拍提升的改进实施工艺方案.pdf VIP
- 航天电器产品手册y50系列电连接器.pdf VIP
- 2025年广水市城市社区专职工作者招聘85人考试备考试题及答案解析.docx VIP
- 二年级语文暑假习题二.doc VIP
- 房建工程监理实施细则样本合集(207页).docx VIP
- 2018-2024年海峡杯数学竞赛真题及答案(二年级).pdf VIP
- 数据处理与信息共享合作协议.doc VIP
- 2023-2024学年辽宁省实验中学、大连八中、大连二十四中、鞍山一中、东北育才学校高一下化学期末检测试题含解析.doc VIP
文档评论(0)