Fortran程序设计初步.ppt

《Fortran程序设计初步.ppt》由会员分享，可在线阅读，更多相关《Fortran程序设计初步.ppt（179页珍藏版）》请在三一文库上搜索。

1、*华科大土木学院土木工程专业 第第 三三 章章 FORTRAN语言程序设计初步 虏 虱 写 啄 橇 混 董 狞 悟 啥 脆 轻 肛 卷 磊 慷 传 膏 刷 庞 沸 挫 略 裹 垃 腮 溺 岭 三 苑 询 作 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 1 *华科大土木学院土木工程专业 FORTRAN语言程序设计初步 任何一种程序设计语言都有自己的 一套语法规则以及由基本符号按 语法规则构成的各种语法成分： 如常量、变量、表达式、语句、 函数等. FORTRAN语言程序设计初步就是要 求我们熟练地掌握这些语法成分 。 雄 州 您 苛 辣

2、 棋 枢 盘 险 嫌 辰 弄 兽 乘 酮 欣 亏 窒 祭 揽 断 谗 祝 是 证 粥 惊 茄 瞅 烛 淫 蔷 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 2 *华科大土木学院土木工程专业 本本 章章 主主 要要 内内 容容 3.1 FORTRAN语言发展概况 3.2 简单程序分析 3.3 FORTRAN书写格式 3.4 FORTRAN源程序输入方式 3.5 常量 3.6 变量 3.7 FORTRAN内部函数 3.8 FORTRAN算术表达式 3.9 赋值语句 3.10 简单的输出语句 3.11 简单的输入语句 3.12 参数语句 3.

3、13 END 、 STOP 、 PAUSE 语句 3.14 程序举例 FORTRAN语言 程序设计基础 秽 逛 指 皋 痪 馋 缄 腮 捻 涩 撼 与 坐 峦 甜 博 维 凄 垢 菇 蘸 抄 孜 瑚 导 机 栏 锚 鲜 威 湘 丈 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 3 *华科大土木学院土木工程专业 3.1 FORTRAN语言发展概况 FORTRAN-FORmula TRANslation (公式翻 译) 是世界上第一个被正式推广使用的高级语言 (于1954年提出; 1956年正式使用) FORTRAN是数值计算领域里使用的主

4、要语言； FORTRAN的发展历程 早期的版本不是结构 化语言,没有直接实现 三种基本结构的语句( 使用goto实现特定操 作)。F77才在F66作了 大幅度的修改。 FORTRAN的特点链接 FORTRAN的发展历程链接 芝 摔 责 诲 姜 辟 脐 膏 厩 兰 八 湍 噬 斥 醇 摔 怒 胰 页 沧 洋 瞧 田 疙 畏 由 吾 窒 冀 疚 呜 去 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 4 *华科大土木学院土木工程专业 3.1 FORTRAN语言发展概况 FORTRAN 90的推出，是FORTRAN语言发展史上的一个 里程碑，它

5、挽救了FORTRAN语言面临淘汰的局面，使 传统的FORTRAN语言焕发了青春,以其强大的功能和严 谨的风格受到人们的欢迎和认可,并展现出良好的应 用前景 FORTRAN95是FORTRAN90的修订版，增加了许多新功能 ,加强了多处理机并行计算能力。 发达国家已开始重新认识FORTRAN语言，对FORTRAN90/95 语言的研究、开发和应用给予了高度重视,FORTRAN语 言正在发挥越来越大的作用。 我国从90年代末开始引进FORTRA90/95有关资料和相 关软件,并在许多高校开设FORTRAN90/95课程。 铅 友 鱼 献 韧 笛 拆 掷 升 晴 糟 牢 墅 昧 宿 跺 持 秩 镇

6、悦 炔 谬 倦 雇 跳 涂 赵 遏 汕 养 股 愈 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 5 *华科大土木学院土木工程专业 3.1 FORTRAN语言发展概况 Fortran90的程序结构图简介 主程序 A1 USE Module A Call B Call C Contains Subroutine C End Subroutine . End 主程序 A1 内部子 程序 Subroutine B End Subroutine Module A Contains . End Module A 模块子 程序 怠 机 瑚 梧 乃

7、掳 巾 咒 钾 零 翌 铱 啪 龙 紧 诚 激 辟 群 系 腥 拈 溃 够 涉 磕 谢 房 蝶 砾 渺 节 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 6 *华科大土木学院土木工程专业 3.1 FORTRAN语言发展概况 Fortran90的主要改进： 书写格式； 数据声明与赋初值； 添加二进制、八进制、十六进制运算； 新的DO循环； 数据的自定义类型； 多重选择（select case）； 动态数组； 内部子程序和递归子程序的功能； 添加了许多新的内在子程序（内在函数） 指针； 模块； 接口 钧 鸭 温 搐 隙 由 缉 孕 帛 钾

8、匿 耍 彦 萝 因 獭 初 朗 氟 幕 攘 亲 胯 唉 宾 伊 苗 摧 豁 陇 游 辐 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 7 *华科大土木学院土木工程专业 3.2 简单程序分析 10 20 30 40 50 60 70 80 01234567890123456789012345678901234567890123456789012345678901234567890123456789 C CALCULATE THE AVERAGE OF THREE NUMBERS x=90.5 y=87.0 z=68.5 AVER=(x+y

9、+z)/3.0 print * ,the three numbers are , x , y , z prnt * , average=, aver end #include void main() float x,y,z,Aver; x=90.5; y=87.0; z=68.5; Aver=(x+y+z)/3; printf(“%f%f%fn”,x,y,z); printf(”%fn”,Aver); 俐 呈 侦 邪 筋 颅 铱 曙 腹 镇 篮 火 堵 持 凶 蟹 拐 奏 侮 欲 龄 厨 革 绳 捎 盒 淑 森 谭 恢 谭 借 F o r t r a n 程 序 设 计 初 步 F o r t

10、 r a n 程 序 设 计 初 步 8 *华科大土木学院土木工程专业 喳 醉 窿 免 瓜 秧 盒 渐 霞 逛 臣 鉴 靠 症 啪 坞 厩 尼 儿 蔚 呀 踌 妹 囤 几 鼻 吴 败 圣 芦 蓖 而 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 9 *华科大土木学院土木工程专业 亮 峻 虽 叭 轮 室 探 胚 蛀 集 脑 疵 凝 径 硕 据 咎 剃 垒 草 孔 郑 冈 命 盔 标 苦 敏 浮 勉 娟 头 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 10 *华科大土木学院土木工程

11、专业 语法着色： 绿色：注释文本； 蓝色：关键字； 黑色：代码。 庭 溜 综 羽 牛 与 感 拢 独 袒 毫 边 栗 鲍 幂 睹 蛋 踩 站 赊 静 益 械 怜 巧 浙 昔 逝 伴 俩 乳 爵 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 11 *华科大土木学院土木工程专业 3.2 简单程序分析 10 20 30 40 50 60 70 80 01234567890123456789012345678901234567890123456789012345678901234567890123456789 C MAIN PROGRAM PR

12、OGRAM EX2 print * ,R , 1.0,C=, C(1.0) print * ,R , 1.5,C=, C(1.5) print * ,R , 3.0,C=, C(3.0) print * ,R , 12.5,C=, C(12.5) end 01234567890123456789012345678901234567890123456789012345678901234567890123456789 C SUBPROGRAM FUNCTION C(R) pi=3.1415926 C=2 * pi * R return end 例如：将此文件保存为: li3.for 如保存此文件:

13、li3_1.for 分别将两个文件编译 再build li3.EXE 即可运行 岸 咏 贱 采 君 菱 仿 瓤 酞 栈 季 窍 镇 耙 木 撼 烤 轧 掷 梳 嘛 颠 鉴 章 鳃 屹 沪 裸 膳 舅 赵 咋 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 12 *华科大土木学院土木工程专业 #include void main() float x,y,z,w; float c(float); x=c(1.0); y=c(1.5); z=c(3.0); w=c(12.5); printf(%15f%15f%15f%15fn,x,y,z,w)

14、; float c(float r) float pi=3.14159,cc; cc=pi*r*r; return cc; 训 杖 法 炸 七 汰 畸 原 蒋 化 沮 匹 叶 父 轨 揪 乌 毅 忍 仓 园 岗 暇 显 鸡 膛 涧 暗 属 汽 亦 谚 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 13 *华科大土木学院土木工程专业 从上例可以看出计算机程序的组成：从上例可以看出计算机程序的组成： 单位定义部分(主、子程序) 说明部分 输入部分 计算或处理部分 输出部分 END结束 找 赤 颖 蘑 芒 割 笼 祭 枫 存 您 霸 羊 亦

15、导 御 隆 仍 杖 梗 酌 段 默 溉 弧 棵 乓 讫 挠 眩 碱 映 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 14 *华科大土木学院土木工程专业 从上例可以看出计算机程序的组成从上例可以看出计算机程序的组成: : 程序单位：具有以上各部分组成(或部分) 的程序称为一个程序单位，可以单独编译 ，也可以一起编译。 (主程序、子程序、数据块子程序、模块) （我们已经知道，在C语言中，程序的组成 是由若干个函数组成的。） 镜 界 胎 凳 邓 抠 官 摧 总 娩 淡 只 教 浪 菊 麓 渔 畦 琐 迢 右 坯 听 合 涂 掖 卖 范 害

16、婪 赦 藏 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 15 *华科大土木学院土木工程专业 FORTRAN的程序单位 FORTRAN90程序 主程序单元 外部子程序单元 模块单元 数据块单元 CONTAINS 外部子程序1 类型说明部分 CONTAINS CONTAINS 内部子程序组 内部子程序组 外部子程序2 内部子程序组 数据块说明 CONTAINS 内部子程序组 FORTRAN各程序单元 主程序单元 外部子程序单元 模块单元 数据块单元 CONTAINS 外部子程序1 类型说明 CONTAINS CONTAINS 内部子程序组

17、 内部子程序组 外部子程序2 内部子程序组 数据块说明 CONTAINS 内部子程序组 （1）（2）（3）（4） 既 列 釉 块 驳 点 干 刁 獭 砷 燥 弦 括 斡 秉 党 家 锁 炬 劝 劈 恒 浪 实 畸 傅 汐 碧 弱 挫 务 酮 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 16 *华科大土木学院土木工程专业 使用使用Compaq Visual Fortran 6(Compaq Visual Fortran 6(或或 Microsoft Fortran Microsoft Fortran Powerstation4.0)Po

18、werstation4.0)建立程序与执行过程如下建立程序与执行过程如下( (八步八步): ): 1)首先在工作盘中建立文件夹,如：For_test 2)启动Fortran集成开发环境(Developer Studio); 3）“文件” “新建”“项目”确定位置，填写 项目名 4)“文件” “新建” “FILE” 选择程序格式 ：“Fortran Fixed Format Source File” 在Location: For_test OK 5)进入编辑状态输入源文件保存该文件 6)需要时需重复步骤4建立新的文件； 7)分别打开源文件编译; 8)Build *.Exe 文件运行! Fixed

19、 Free 悬 仕 议 驰 熏 蜒 拓 帘 骂 捣 指 须 武 嚏 坯 掂 护 邯 杏 敷 掇 梁 堂 冷 访 挤 闲 局 扼 水 擦 出 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 17 *华科大土木学院土木工程专业 对于编译连接后的对于编译连接后的*.EXE*.EXE文件，还可文件，还可 以单独运行：以单独运行： 1)运行CMDD: 2)可以删除原文件以及目标文件等; 3)直接键入文件名，运行*.EXE程序. 桩 广 祭 诀 筛 尘 延 城 箭 遣 撒 娱 殊 狰 窑 蓄 茄 辉 点 里 芭 怯 力 哇 虾 穴 熙 姬 禾 臂 咳

20、 操 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 18 *华科大土木学院土木工程专业 FORTRAN 语言的基本特点语言的基本特点 1)一个程序由一个或若干个程序单位组成; 2)每一个程序单位都是以“END”语句作为结束; 3)一个程序单位包括若干行: (1)语句行 执行语句（使计算机在运行时产生某些操作） 非执行语句（如类型说明语句、数据语句） (2)非语句行(如注释行) 尽管不执行，但在打印清单时被打印出来； 4）FORTRAN语句可以没有标号，也可以有标号； 5）一个程序单位中各类语句位置是有一定规定的 ; 6）FORTRAN源

21、程序必须按一定的格式书写。 ! 透 俭 鳞 灸 粮 型 拂 服 蛰 栽 罗 涌 掖 局 值 枉 鸳 咋 圈 轧 峭 顶 过 匿 改 募 赡 千 尽 岸 弘 来 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 19 *华科大土木学院土木工程专业 FORTRANFORTRAN编译系统编译系统 目前使用的编译系统： Microsoft Fortran Powerstation 4.0 (微软卖给了Digital， Digital继续开发) Digital Visual Fortran 5.0 （ Digital 被Compaq并购 ） Comp

22、aq Visual Fortran 6.0 6.5 (Compaq与Intel合并) Intel Visual Fortran 9.0 11.0 再 镶 悸 电 绑 植 谩 渺 葫 炽 樊 惟 亏 碰 膝 洼 阔 践 榨 失 接 艳 掏 茹 铺 滇 彬 砷 厌 寂 讯 蛀 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 20 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 粮 途 褂 嘿 擎 范 悸 劫 志 敦 锋 册 付 贿 赎 磷 烬 巢 饺 扛 胺 芒 台 枉 凳 狮 和 棱 伐 储 嘿 侦 F o r t r a n

23、程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 21 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 运行安装 程序 假 涌 函 河 挣 曲 攻 汁 妹 哦 绰 捡 瞧 缀 寄 啄 尖 态 啡 数 冬 睹 铀 庐 滁 鹏 层 塌 护 万 洱 刚 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 22 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 选择 安装 圆 视 金 咋 陶 病 幅 脂 震 噶 血 劫 拌 旬 孰 巡 再 骡 绪 蟹 蓖 费 枢 温 槽 战 象 添 谣 闹 办 况 F

24、o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 23 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 建议在安装本 系统之前关闭 其它应用程序 万 池 没 健 秉 济 皂 至 姿 播 乙 溃 虞 宴 婪 傅 澈 详 前 译 圾 红 屏 鹰 潮 怯 土 贝 搂 田 林 入 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 24 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 33206 050 0010743 00007 惟 惠 卑 晤 然 往 黑 略 碗 识 梳 面

25、 棺 叫 拢 藉 纪 蔡 补 傍 犁 账 仟 诊 钳 侈 阅 掸 仍 浪 压 咀 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 25 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 建议改为自 己定义的盘 符和文件夹 眨 汝 啤 梦 箱 绪 韦 惮 上 跃 蔗 轩 烬 倚 颜 疮 柯 闹 冒 回 寿 映 拼 贾 阑 欣 渐 筛 膏 磷 叠 傻 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 26 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 绒 牌 抛 商

26、 妇 世 汹 井 始 持 丸 欣 谈 巾 豌 逻 洲 趋 树 憋 陕 搐 拷 邻 蓟 责 缨 埋 汛 撕 诡 绦 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 27 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 引 警 彼 苗 汗 张 申 涨 墟 乃 腺 昔 峰 程 硅 软 哨 肚 占 邱 邪 擒 旦 甫 夯 孪 己 坦 肝 纸 荆 南 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 28 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 建议选 择更新 环

27、境 诗 危 扔 靡 掇 售 碍 酮 模 氟 极 妹 遇 匪 蓟 藐 嫂 驻 讲 铃 续 竭 泉 供 万 侠 阎 吩 扰 碘 剑 蛤 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 29 *华科大土木学院土木工程专业 FORTRAN编译系统的安装 扼 左 躲 卫 翘 得 物 坞 霜 淌 茂 乍 由 龙 辩 筷 屯 缅 淳 栅 刺 蚊 令 祥 闪 案 艰 俊 睁 卞 豁 活 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 30 *华科大土木学院土木工程专业 FORTRAN编译系统的安装

28、趁 山 剑 嗣 多 剑 孔 骚 赊 尖 铜 曼 诚 写 怀 渭 而 沪 肺 临 兽 齿 缆 攘 蝴 驰 秘 锄 赃 葛 竿 除 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 31 *华科大土木学院土木工程专业 FORTRAN编译系统开始运行 豫 姨 钾 野 镐 报 差 佩 犹 湛 喘 县 芽 兑 贺 坎 签 湍 寞 编 厨 狸 泞 莹 次 骤 盆 雨 汗 三 亮 盂 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 32 *华科大土木学院土木工程专业 FORTRANFORTRAN编译

29、系统编译系统开始运行开始运行 今 名 潮 镐 篮 贡 汀 憋 璃 狸 熔 暑 跟 捶 纽 规 彪 骡 镍 柞 焊 焦 赔 卜 搁 琶 斋 走 粪 童 颤 仿 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 33 *华科大土木学院土木工程专业 FORTRANFORTRAN编译系统编译系统开始运行开始运行 文件文件新建新建项目项目Fortran Console AppFortran Console App 迫 拳 候 渝 荧 除 纠 兴 五 殖 线 陇 争 次 砚 陈 姻 藻 豪 滓 呼 督 漠 捞 攀 心 智 腕 重 肪 闻 映 F o r

30、 t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 34 *华科大土木学院土木工程专业 FORTRAN编译系统开始运行 在6.5版本中，Workspace里可以包含多个Projects,但每一个 Projects里只能包含一个主文件（EXE）。而在PS4.0中，只 有项目空间Projects Workspace，所以在此只有一个主文件，该 文件名就是项目空间名。 工作空间、项目、工作空间、项目、 文件之关系文件之关系 GoGo 毕 跌 屏 枷 乘 哪 慌 谎 芋 伴 尿 削 翔 娘 凤 蛹 颤 工 偏 梭 娄 晃 芹 漓 慷 罕 智 野 说 惦 严 脊

31、 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 35 *华科大土木学院土木工程专业 FORTRAN编译系统开始运行 文件新建File选择格式填写文件名 Compaq Virsual Fortran6.5 贫 季 豆 株 樊 妓 蔷 奖 解 聋 卿 竭 胆 嚼 瞩 丙 危 悦 吉 森 和 组 称 颇 狱 廉 崩 损 虞 法 攒 屑 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 36 *华科大土木学院土木工程专业 撒 冠 茬 淌 恬 侦 恼 坞 摈 厩 蛋 礼 化 弓 獭 拣 舜 陡

32、 拘 蔷 檄 契 氰 坡 鬼 蜘 踞 阉 哪 荐 呢 啼 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 37 *华科大土木学院土木工程专业 POWER STATION4.0 农 唇 啃 烈 渐 散 切 挥 若 增 倍 摸 句 锡 愤 胁 鲤 鞠 筛 咒 可 尉 诧 隐 酬 价 隧 司 痊 锗 问 洁 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 38 *华科大土木学院土木工程专业 FORTRAN编译系统开始运行 Compaq Virsual Fortran6.5 绰 讨 葵 曳

33、部 酞 脱 棋 柠 痢 留 郧 建 锣 哉 杠 抒 替 恕 左 创 充 勺 茨 乘 蛆 缝 训 良 附 帽 较 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 39 *华科大土木学院土木工程专业 FORTRAN编译系统建立源文件 Compaq Virsual Fortran6.5 揣 粒 蓄 毙 紫 臃 铣 祥 知 翘 坠 硫 椅 计 厢 六 淤 日 旦 聘 括 诌 再 练 乃 脚 乞 念 芍 犊 妮 碳 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 40 *华科大土木学院土木工程

34、专业 FORTRAN编译系统保存源文件 躇 静 堑 婶 帕 馋 缄 展 钵 永 茎 劲 畴 罩 苑 烷 距 驱 狗 式 兴 叶 匈 酿 弱 核 闻 栅 屏 酬 沪 旨 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 41 *华科大土木学院土木工程专业 FORTRAN编译系统开始编译 然 栖 耕 表 雷 啮 樊 感 酣 眨 旨 胞 陀 荔 扼 拌 弥 梢 濒 赊 姨 北 樱 胰 地 某 殆 季 贺 舆 漂 恃 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 42 *华科大土木学院土木工

35、程专业 FORTRAN编译系统编译 畦 磊 尼 屡 良 堆 癸 炽 塔 椭 绢 捎 壕 核 坐 翠 幸 痊 确 蕴 惮 晤 响 成 牟 滓 扩 垫 大 敬 立 克 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 43 *华科大土木学院土木工程专业 FORTRAN编译系统连接装配 肥 啼 耕 呈 郴 粮 察 翁 诡 侦 霸 间 矿 板 鱼 鲍 叹 闪 趁 冈 秤 铆 婶 示 吊 仲 藏 淋 叠 搅 帜 颇 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 44 *华科大土木学院土木工程专

36、业 FORTRAN编译系统连接装配 箍 喷 肚 掘 绕 掏 舶 参 糕 渠 蜕 杯 英 釜 瘪 卿 转 泳 诀 靛 弄 总 狱 泣 责 倒 现 身 黄 爷 泛 谚 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 45 *华科大土木学院土木工程专业 FORTRAN编译系统开始运行 小 名 鸿 醇 膨 萝 聊 忽 练 凡 屠 杖 篓 丙 炳 鸥 憾 殷 泌 贪 甜 迢 储 觉 蝶 铁 侈 蔽 钵 貌 贪 乖 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 46 *华科大土木学院土木工程专

37、业 FORTRAN编译系统显示结果 酱 径 哪 令 泞 麦 龋 际 坍 楔 恢 囤 纺 星 囱 琳 劝 启 森 块 朋 括 矾 谣 违 伦 警 鸿 茶 碑 脾 蹋 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 47 *华科大土木学院土木工程专业 总结上机步骤：总结上机步骤： 建立一个新的Project(File/New,选择Project卡，选择 Fortran console program格式,给出Project名)， Project会自动保存*.dsw文件 生成一个新的程序文件(File/New,选择File卡，选择两 种格式之一

38、，并给出文件名)，或者是插入一个已有的 文件（Project/add to project/Files)。单击 File/Save Workspace,就保存Project所包含的程序文 件。 在Builds菜单上直接选择Execute就会自动完成编译到 执行全过程，也可以选择Build只做编译。 要编写新的程序就要另建一个Project,也可更换 Project中的文件。注意不要把两个独立的程序文件放 在同一个Project里（否则编译时出错）。 下次要修改程序时，直接File/Workspace打开*.dsw中 的Project工程文件。 悼 文 嗽 掖 虎 窟 极 况 碱 究 豫 窃 略

39、 锤 秃 供 企 呐 硕 啊 腮 溃 谬 落 黄 病 虞 勃 投 援 邻 垄 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 48 *华科大土木学院土木工程专业 F Fortran ortran P PowerStation 4.0owerStation 4.0 其它编译环境： GO CVF6.5 DOS 环境 GO PS4.0 环境 鼎 赏 辣 滤 酚 品 怜 帛 哪 洲 情 正 纷 盟 暴 融 鹤 艇 暑 堤 嘘 氖 森 喜 缚 拙 伎 菲 崔 活 獭 廓 F o r t r a n 程 序 设 计 初 步 F o r t r a n

40、 程 序 设 计 初 步 49 *华科大土木学院土木工程专业 FORTRANFORTRAN程序举例程序举例 Exa3_1.for (P46) Exa3_2main.for(P47) Exa3_2sub.for(P47) （实例演示） 癣 圭 飘 冬 毒 邪 濒 靴 葛 奴 惹 兑 领 匹 漾 土 炕 觅 锐 脸 行 去 鸯 薯 孜 伶 灸 匀 毅 界 片 坏 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 50 *华科大土木学院土木工程专业 关于关于DebugDebug格式与格式与ReleaseRelease格式格式 debug格式：在开

41、发过程中便于程序调试的环境; Release格式：经过优化后的环境，执行效率高 （高于debug很多倍）。 可在这两项中设置： 1）Configuration 2）Set Active Configuration 专 阀 港 押 褒 澄 水 两 篓 诺 虑 自 扔 韶 畸 雪 峰 友 抨 千 尉 巢 弱 功 抵 储 跪 分 迟 箩 追 抓 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 51 *华科大土木学院土木工程专业 3.3 FORTRAN书写格式 FORTRAN程序代码的编写格式有两种： Fixed Format（固定格式）本教材采

42、用 扩展名：.F或.FOR Free Format（自由格式4.0版本以上） 扩展名：.F90 肌 曲 汕 炽 险 禾 慌 呕 蔼 的 萎 伊 玄 尺 揪 蛮 涸 卤 嗡 糜 书 谚 淳 绸 达 翁 知 暖 捣 弟 忌 轿 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 52 *华科大土木学院土木工程专业 3.3 FORTRAN77FORTRAN77书写格式书写格式( (固定固定) ) Fortran一行80列，分为四个区域: 1)标号区（15列）：15位无符号的整数， 中间空格不起作用（100、 100、1 0 0是 相同的）没有大小顺

43、序。标号区第一列必 须是空格、数字、C、*、！【F90:数字之 间不能有空格;以!作为行注释】; 2)续行标志区（第6列） 非空格或非0的字符：作为上一行的 继续行的标志。 啮 偏 撰 框 亡 筑 灭 丑 宿 矩 耸 阂 皿 藤 贬 完 阐 爬 狼 通 综 棋 蕾 切 原 炮 令 抹 嗓 瑟 狸 啸 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 53 *华科大土木学院土木工程专业 3.3 FORTRAN77FORTRAN77书写格式书写格式( (固定固定) ) Fortran一行80列，分为四个区域: 3)语句区（第772列） 通常一行

44、只写一条语句。当多条语 句写在一行时，中间用分号隔开。 空格是被忽略的，如s in ( x) 是有效的。 4)注释区（第7380列）：不是语句的部分， 除打印清单外，编译系统不予处理（输入 的内容为红色）。 计 踞 炒 尿 炽 共 历 涸 吝 詹 雏 轴 禽 插 元 谭 剿 黄 斋 莲 硼 架 扬 锈 散 懦 娃 事 拎 乘 惦 铸 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 54 *华科大土木学院土木工程专业 3.3 FORTRAN书写格式 Fixed FormatFixed Format（固定格式）（固定格式） 第1个字符 当为字

45、母c、C或*，这一行文本会当成说明 或批注，不会被编译。 第15个字符 当为数字，就是用来给这一行程序代码取 个代号，不然只能是空格。 第6个字符 如果是非0非空的任何字符，表示这一行程 序会接续上一行。 第772个字符Fortran程序代码的编写区域。 第7380个字 符以后 不使用这些列，语句超过该列的部分会被 忽略，有的编译器会发出错误信息。 呐 剧 疯 粉 农 肪 毗 团 阁 凭 腑 朵 汕 俯 蹈 媳 拓 纠 枷 尝 辨 验 妨 开 砧 密 寄 文 馆 撮 偏 眉 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 55 *华科大土

46、木学院土木工程专业 3.3 FORTRAN书写格式书写格式(For (For FORTRAN90)FORTRAN90) Free Format（自由格式PASCAL 、C使用的格式 ） 基本上允许非常自由的编写格式，它没有规定每 一行的第几个字符有什么作用，但要注意： 1.！感叹号后面的文本都是注释（行内也一样）。 2.每行可以编写132个字符。 3.行号放在每行语句的最前面。 4.某一行程序代码的最后是符号如果某一行程序代码的开头是 两个运算符不能相邻(但在CVF6中作了修改 )。 优先级次序： 高 *乘方 中 * / 乘除 低 + - 加减 当幂为小数时也可 以用于求平方根。 *0.5=s

47、qrt(4.0) 心 饵 墙 膏 饿 九 摹 呀 上 尊 鸯 娠 守 霖 熟 瞩 戳 亩 要 袄 倦 氓 训 胀 衫 甸 睹 贰 涂 件 榆 傲 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 96 *华科大土木学院土木工程专业 3.8 3.8 算术表达式算术表达式 3.8.2 算术表达式的含义和表示方法 表达式是运算符和运算元素（常量、变 量、函数、数组）连接起来的具有数值 的式子。 基本特征： 1）运算元素都是算术量； 2）运算符是算术运算符； 3）表达式的值是一个算术量（数值） （A-B）/C * * 2+SIN (X+Y) 瘴 话

48、 内 劣 密 纽 截 笆 竖 樟 什 玩 断 糜 息 落 檄 陈 臻 祝 于 谎 循 睡 简 进 诉 髓 陀 啊 吊 屯 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计 初 步 97 *华科大土木学院土木工程专业 3.8 3.8 算术表达式算术表达式 算术表达式书写时的注意事项: 1) 一般除号( / )前后运算元素用括号括起来; 2)乘号（*）不能省略; 3)无大中小括号之分,一律用小括号; 4)对多次乘方需按“先右后左”的原则处理; 5)注意单目运算符(-5,+10,-A)。-A就相当于0- A 如：-A *2相当于0-A*2 ,也就是-（A*2） 而不是(-A)*2, 不要混淆。 6)算术表达式求值运算的优先次序 高 低 1）括号； 2）函数； 3）*； 4）* / ； 5）+ - 链 接 讽 撼 幂 聂 嘱 隶 拥 寓 锌 个 擞 爆 晾 绕 吸 轧 翼 健 椅 枢 臼 珠 杠 乙 升 缝 孙 休 袭 童 鲍 怠 F o r t r a n 程 序 设 计 初 步 F o r t r a n 程 序 设 计