《Fortran语言程序设计》实验指导书Word下载.docx

1、必开/选开1FORTRAN基本程序结构及输入/输出实验2验证性本科生必开选择结构实验3循环结构实验4外部函数实验5子程序实验一6子程序实验二7文件的操作实验8Fortran90有关标准实验9综合实验一：线性代数方程组求解实验综合性10线性相关分析实验五、实验教学的目的和要求本门实验课的目的是通过上机实验，让学生掌握Fortran语言的编程环境，熟悉Fortran语言的语法规则，能够熟练使用Fortran语言编写小型程序。六、实验课程考试方式1、实验报告每次实验完成后必须编写实验报告。实验报告应包括实验内容（表达实验的基本内容）、实验结果（算法设计结果、程序编写结果、给定的输入实验数据、实验测试

2、结果）及实验过程中存在的问题。2、考核方式实验参加的次数和实验报告的成绩综合评定，方法如下： （1）必须参加实验和编写实验报告才可以参加成绩评定。（2）共有10个必须的实验，每次占十分之一。（3）实验课成绩占课程总成绩的30。实验一：Fortran基本程序结构及输入/输出实验一、实验课时：2学时二、实验目的、内容及要求1、实验目的（1）了解FORTRAN90软件开发环境。掌握FORTRAN90上机实验基本操作过程。掌握FORTRAN90软件开发环境启动方法。理解有关工作区、项目、文件的基本概念。掌握工作区、项目、文件创建方法。熟悉Microsoft Developer Studio软件开发环境

3、图形用户界面。掌握程序的编辑、编译、构建、运行方法。了解软件开发环境常用菜单、工具按钮、环境窗口基本功能。掌握文件、文件夹的移动、复制、删除等操作方法。（2）了解FORTRAN90字符集。掌握FORTRAN90实体名称的语法描述规则和具体使用要求。了解FORTRAN90关键字意义，以及与名称的区别。掌握FORTRAN90程序组织结构和语句排列次序的基本原则。掌握FORTRAN90固定书写格式及三个标志符的主要作用。理解数据、数据表示、数据类型概念，熟悉FORTRAN90数据类型。掌握顺序结构概念和顺序结构程序设计方法。掌握表控输入、输出的基本功能和使用要求。2、实验内容（1）运行Microso

4、ft Developer Studio软件开发环境。（2）理解有关工作区（Workspaces）、项目（Projects）、文件（Files）的基本概念。（3）掌握工作区（Workspaces）、项目（Projects）、文件（Files）创建方法。（4）掌握程序的编辑（Edit）、编译（Compile）、构建（Build）、运行（Run）方法。（5）编写一个顺序结构的小型程序，内容包括输入，计算和输出三个部分。3、实验要求（1）熟悉Fortran语言编译程序的使用。（2）独立完成自己的任务。（3）写出实验报告。（4）遵守实验室的一切规定。三、实验原理1、问题描述现有长1500米，宽1000米

5、的地块要拍卖建造住宅小区，地块中央有一半径为100米的圆形公共绿地不属于拍卖范围，每平方米地价为5000元。编写程序计算该地块拍卖总价，并输出。要求地块长宽和绿地半径数据从键盘输入。2、算法设计通过对该问题的分析研究，设计求解算法。对于结构化程序设计来讲，一般是IPO结构，即输入（Input），处理（Process）和输出（Output），其算法图形（N-S）如下：输入：地块长度（length）、宽度（width）、绿地半径（radius）、地块单价（unitprice）处理：（1）计算地块面积：area1=lengthwidth（2）计算绿地面积：area2=2radius2（3）计算拍卖地

6、块面积：area=area1-area2（4）计算拍卖地块的总价：totalprice=areaunitprice输出：拍卖地块的总价totalprice3、实验步骤（1）建立文件夹在计算机某个逻辑盘（如F盘）根目录下创建一个文件夹（如以自己的班级和学号命名，再结合课程名称“Fortran”来命名的文件夹，如F:2602040120fortran，以下以该文件夹为例进行说明），由于该软件开发环境不识别以中文名字命名的目录，故只能以英文或数字组合进行命名。（2）启动Microsoft Developer Studio软件开发环境，并创建工作区、项目一个文件夹可以有几个工作区（Workspaces

7、）。一个工作区可以有几个项目（Projects）。一个项目内可以有几个文件（Files），但只能有一个主程序文件。该软件环境要求先创建工作区，再创建项目，后创建文件。创建工作区（Workspaces）：单击“File”/“New”菜单，弹出“New”对话框。选取“Workspaces”选项卡，在“Location：”文本框输入建立的文件夹，在“Workspace name：”文本框输入工作区名（如shiyan1）。单击“Ok”按钮完成工作区的创建。创建新项目（Projects）：选取“Projects”选项卡，在项目类型区单击选取“Win32 Console Application”项目类型，

8、单击选取“Add to current workspace”项，在“Project name：”文本框输入项目名（如xm1），在“Location”文本框取默认值“F:2602040120fortranshiyan01xm1”。单击“Ok”按钮完成项目创建。（3）创建文件（Files）文件有三种，第一种是源程序文件，第二种是程序的辅助描述文本文件，第三种是程序的程序流程图文件，下面分别叙述：创建源程序文件（Files）：源程序文件是项目中必不可少的文件。一般项目创建后，首先要创建源程序文件，及时编辑输入源程序文本。源程序文件有两种书写格式（固定格式和自由格式），这里以自由格式为例介绍源文件的创

9、建方式。选取“Files”选项卡，在文件类型区单击选取“Fortran Free Format Source File”文件类型。单击选取“Add to project：”项，同时在下方列表框中选择项目名称（xm1）。在“File name：”文本框输入文件名：chengxu1。在“Location：”文本框取默认值“D:单击“Ok”按钮,在右侧打开“源程序文档窗口”。在“源程序文档窗口”中编辑输入给定的源程序文本。创建辅助文档文件，编辑输入问题描述文本：一个好的软件，不仅要有源程序文件，而且还应有其它相关的辅助文档文件。问题描述文档文件是软件文档的重要组成部分，便于随时了解程序有关的问题描述

10、，有助于理解程序。选取“Files”选项卡，在文件类型区单击选取“Text File”文件类型，单击选取“Add to project”项，同时在下方列表框中选择项目名称（xm1）。在“File”文本框输入文件名称（如miaoshu1）。在“Location”文本框取默认值“F:单击“Ok”按钮，在右侧打开“辅助文档窗口”。在“辅助文档窗口”中编辑输入给定的问题描述文本。创建辅助文档文件，绘制程序流程图：选取“Other Documents”选项卡，在文件类型区单击选取“Microsoft Word文档”文件类型。单击选取“Add to project”项，同时在下方列表框中选择项目（xm1）

11、。在“File”文本框输入文件名（如suanfa1）。”文本框取默认值“F:文档窗口类似于Word软件窗口。在“辅助文档窗口”中绘制给定的程序流程图。（4）编译项目内源程序文件。源程序文件是一个文本文件，它不能直接执行，必须通过编译过程将其编译转换为机器语言程序，才能在计算机上运行。单击“Build”/“Compile”菜单。若源程序文本无语法错误，则在下方“Output”窗口中显示信息“chengxu1.obj - 0 error（s）, 0 warning（s）”，同时在“debug”文件夹中创建中间文件“chengxu1.obj”，否则显示错误信息，需对照给定的源程序修改源程序文本，然后

12、再进行编译，直到编译正确为止。（5）构建可执行程序文件。编译成功后，所生成的中间文件（obj文件）还不能立即执行，需要通过构建生成可执行文件“exe文件”。exe文件是能在任何环境中运行的可执行程序。单击“Build”/“Build”菜单。若源程序文本正确，则在下方“Output”窗口中显示信息“shiyan1.exe - 0 error（s）, 0 warning（s）”，同时在“debug”文件夹中创建可执行程序文件“shiyan1.exe”，否则显示错误信息，需对照给定的源程序修改源程序文本，然后再进行编译和构建，直到构建正确为止。（6）运行可执行程序文件。构建成功后，生成的可执行文件（

13、exe文件）能立即运行。输入数据，便可获得结果数据。单击“Build”/“Execute”菜单。弹出DOS操作方式文本窗口，根据要求输入有关数据信息执行。 通过以上六个步骤就完成了一个程序的建立到执行的全过程。在每个部分都有一些快捷键可以使用，也可以将几项任务放在一个窗口完成（如工作区和项目的创建就可以在一个步骤里面同时完成），这些等同学们基本熟悉了环境以后就可以自己摸索进行。另外，在该软件环境里有很好的帮助文件（Help），同学们可以通过该帮助文件进一步学习。4、实验模型由于是开始认识Fortran的软件开发平台，这里先给出这个程序的示例，以后的程序要自己进行编写。!班级：?姓名：时间：计算地块拍卖价格PROGRAM test_priceREAL length,width,radius,unitpriceREAL unitprice,totalprice,area1,area2,areaWRITE（*,*）请输入地块长度值（单位为m）：READ（*,*）lengthWRITE（*,*）请输入地块宽度值（单位为m）：READ（*,*）widthWRITE（*,*）请输入绿地半径（单位为m）：READ（*,*）radiusWRITE（*,*）请输入地块单价（单位为