2.1 FORTRAN90的编程环境
一、实验目的
1. 掌握FORTRAN90的集成开发环境——Fortran PowerStation 4.0。
2. 熟悉Fortran PowerStation 4.0的安装、启动和退出。
3. 熟悉Fortran PowerStation 4.0的各工具图标和菜单的作用。
4. 熟练掌握FORTRAN90程序上机实验过程。
二、实验要求
1. 掌握进入Fortran PowerStation 4.0集成开发环境的方法。
2. 分别掌握用菜单、快捷键和工具栏图标进行编译和连接的方法。
3. 理解程序设计的概念，掌握FORTRAN90程序结构与书写规范。
4. 熟悉FORTRAN 90程序从输入到运行的全部操作。
5. 按照题目的要求，认真实验上机实验，并对结果进行分析。
三、实验内容
1. 进入Fortran PowerStation 4.0集成开发环境：
开始→程序→Fortran PowerStation 4.0→Microsoft Developer Studio，单击后，进入如图2-1-1所示的FORTRAN90集成开发环境。
2. 熟悉Fortran PowerStation 4.0集成开发环境及菜单的使用：
⑴ 建立项目工作间：
选择File→New→Project Workspace，点击OK，出现如图2-1-2所示的界面。在Name栏目中输入工程名SX，点击Create，出现如图2-1-3所示的界面。
⑵ 编辑源程序：
①选择菜单Insert→Files into Project，出现如图2-1-4所示的界面。
②在File Name栏目里键入源程序文件名EX.F90，点击OK按钮，出现如图2-1-5所示的界面。
③单击“是”按钮，出现如图2-1-6所示的界面。
④单击左栏目SX文件夹前的“＋”号，出现EX.F90文件，双击该文件，进入源程序编辑环境，如图2-1-7所示。
⑤在图2-1-7的界面右栏目里输入源程序如下：
PROGRAM EX1
IMPLICIT NONE
PRINT*,'HELLO,FORTRAN90'
END PROGRAM EX1
⑶ 编译、连接、运行源程序：
选择Build→Compile EX.F90，实现对源程序的编译；
选择Build→，实现对源程序的连接；
选择Build→，实现源程序的运行，运行结果如图2-1-8所示。
3. 建立新文件：
⑴ 在编辑状态下，单击编辑窗口左栏目中的文件EX.F90，如图2-1-9所示。
⑵ 单击按钮，这样就删除了EX.F90文件。
⑶ 重新通过选择菜单Insert→Files into Project，重复上述步骤，建立新文件EY.F90，输入源程序如下：
PROGRAM EX2
IMPLICIT NONE
INTEGER::I=3,J=5
PRINT*,'I=',I,'J=',J
END PROGRAM EX2
编译、连接、运行后，结果如图2-1-10所是
四、实验说明
1. Fortran90程序的运行必须在一个项目工作间中，且一个项目工作间中只能有一个主程序（可以有多个子程序）
2. 源程序的编译可以点击工具栏图标，也可以用快捷键Ctrl+F8完成编译过程。
3. 目标程序的连接可以点击工具栏图标，也可以用快捷键Shift+F8完成连接过程。
4. 编译和连接过程中若发现程序中有错误，需返回源程序编辑界面，修正错误后再次进行编译和连接，这个过程有时候需要反复进行，直到程序连接成功。
5. 上机过程中，要注意屏幕上显示的信息，并学会根据计算机所给出的信息修改程序，这是程序动态调试的步骤之一。
五、思考题
1. 输入如下FORTRAN90源程序。
PROGRAM EXAM1
IMPLICIT NONE
PRINT *，'5*3=',5*3
PRINT *，'This is a program！'
END PROGRAM EXAM1
编译、连接、运行，查看结果。
2. 输入并调试以下程序：
PROGRAM EXAM2
IMPLICIT NONE
INTEGER::A,B
A=8
B=9
PRINT *,'A=',A
PRINT*,’B=’,B
END PROGRAM EXAM2
编译、连接、运行，查看结果。
2.2 简单程序设计
一、实验目的
1. 掌握FORTRAN90程序中所用到的类型说明语句、赋值语句、输入输出语句等语句格式，理解并掌握这些语句的功能。
2. 理解程序的概念，知道什么是顺序程序结构，逐步培养自己分析问题、解决问题的能力。
3. 掌握简单程序设计方法，能够用简单的语句编写一些简单的应用程序。
4. 掌握FORTRAN90源程序的结构特点与书写规范。
二、实验要求
1. 认真复习教材第1章的内容。
2. 根据题目要求，设计编程各题算法并画出流程图，按照流程图编写各题的程序。
3. 对每个程序进行语法检查与逻辑检查。
4. 上机调试程序：将各题程序输入计算机，并且编译和连接。如果在编译、连接中有错误信息，则要根据这些信息到程序中的错误所在，然后修改程序，直至正确。
5. 运行程序，记录数据输入、输出信息，并对结果进行分析。
三、实验内容
1. 输入并调试下面程序：
PROGRAM EX1
IMPLICIT NONE
INTEGER::A1,A2
REAL::B1,B2
CHARACTER(LEN=5)::C1,C2
LOGICAL::D1,D2
READ *,A1,A2,B1,B2,C1,C2,D1,D2
PRINT *，A1,A2,B1,B2,C1,C2,D1,D2
END PROGRAM EX1
运行结果是：
2. 输入并调试以下程序：
PROGRAM EX2
IMPLICIT NONE
INTEGER::A,B,C
READ *,A,B
C=A+B
PRINT *,'A+B=',C
END PROGRAM EX2
运行时，输入2,3↙，则结果是：
3. 上述程序中，运行时，输入3*2,3↙，则结果是：
  与上题比较一下结果的变化。
4. 程序设计
⑴ 已知一个球的半径，求它的表面积（4R2）、体积（R3）及经过球心的横切面的直径(2R)、周长（2r）和面积（R2）。
⑵ 某单位在发放工资时，为每个职工准备一个工资袋。假定币值为100元、50元、10元、5元、2元、1元、5角、2角和1角9种，设某职工的工资为X，试计算他的工资袋里各币值的张数。
四、实验说明
1. 简单的FORTRAN 90程序中所用到的类型说明语句、赋值语句、读、写语句，是FORTRAN程序中最常用的语句，对这些语句的格式、功能必须熟练掌握。
2. 掌握FORTRAN90程序结构，理解顺序程序设计的意义。
3. 书面检查是程序调试中非常重要的步骤，在写完程序后一定要仔细检查程序的逻辑正确性和语法正确性，尽量减少上机时的出错因素，这是程序静态调试的方法。
4. 上机过程中，要注意屏幕上显示的信息，并学会根据计算机所给出的信息修改程序，这是程序动态调试的步骤之一。
五、思考题
1. 编程求方程X2+3X-1=0的根。
2. 任意输入一个三位数，编程求其个位数字、十位数字和百位数字并输出。
2.3 选择结构程序设计
一、实验目的
1. 掌握关系表达式、逻辑表达式的正确书写形式，能够画出分支结构的结构化流程图。
2. 掌握逻辑IF语句、块IF语句、多重条件IF语句、CASE结构等语句的语句格式、基本功能及执行过程。
3. 掌握选择结构程序设计的一般方法，能够用多种方法编写同一程序。
4. 熟练掌握分段函数、求一元二次方程根等问题的算法。
二、实验要求
1. 认真复习教材第2章的内容。
while语句的嵌套流程图2. 按照题目要求，对编程各题画出流程图。根据流程图，编写出各题的程序，并认真进行静态检查。
3. 对于程序设计题⑴，要求用X=-2，X=0，X=3三个值分别检验程序，并输入X的值为-1、1，分析程序运行结果。
4. 对于程序设计题⑵，要求分别输入各分数段的成绩，分析程序运行结果。
5. 对于程序设计题⑶，要求分别用下面三组输入来验证程序：
  1,6,9
  2,5,3
  3,6,5
6. 详细记录输入数据、输出数据，并分析实验结果。
三、实验内容
1. 运行下面程序：
PROGRAM EX1
IMPLICIT NONE
INTEGER::A,B,C
A=5;B=3
C=A.AND.B
PRINT *,C
END PROGRAM EXAM1
运行结果是：
2. 运行下面程序：
PROGRAM EX2
LOGICAL::L1,L2,L3
L1=.TRUE.
L2=2>3
L3=.NOT.L2.AND.L1
PRINT *,L1,L2,L3
END PROGRAM EX2
运行结果是：
3. 程序设计
⑴ 计算函数：
⑵ 由键盘输入学生成绩，要求输出该成绩的等级A, B, C, D, E。其中60分以下为E；60~70分为D；70~80分为C；80~90分为B；90~100分为A。要求分别用块IF和块SELECT CASE语句编写。
⑶求一元二次方程的根，a，b，c由键盘输入。
四、实验说明
1. FORTRAN 90语言中选择结构程序设计，用块IF语句、逻缉IF语句、多重条件IF语句、CA
SE结构来实现。对于“单边”的分支结构，一般可用不包含ELSE块的块IF语句来实现，若分支中只包含一个语句，则可以由逻辑IF语句来实现；对于“双边”的分支结构，可以用包含ELSE块的块IF 语句来实现；对于多分支结构，一般可以用多重条件IF语句或CASE结构来实现。
2. 在选择结构程序的调试中，要注意各个分支的正确性，在静态检查无错，编译、连接通过的情况下，可以选择多组数据作为输入来运行程序，这些数据分别“走过”各条支路，以验证程序中各条支路的正确性。
五、思考题
1. 输入三个数A、B、C，出其中最小的数输出。
2. 输入一个整数，判断是否为7的倍数，若是，则输出“YES”，否则输出“NO”。
2.4 循环结构程序设计

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。