地球物理勘探数据处理程序设计-实验内容-2017

中国矿业大学资源学院《地球物理数据处理程序设计》

实验报告

班级

姓名

学号

实验1 Fortran编译器的安装使用

1.实验目的

编译器是将程序代码翻译成机器语言的工具，而IDE是将代码的编辑编译连接以及运行集成于一体的集成开发环境。由于计算机操作系统不断的发展，原有的编译器很大可能不能适应新的操作系统。本实验的目的在于使学生能够根据具体的操作系统（xp,win7,win8,win10,linux等）选择并获得合适的编译器产品，安装在个人电脑上，并能成功运行第一个简单程序。

2.实验内容

（1）根据电脑的具体操作系统配置，选择合适的编译器

（2）完成该编译器的安装，详细描述必要的安装过程；

（3）完成一个简单程序的编译，给出编译和运行的截图。

实验报告内容

（1）实验名称

（2）实验目的与内容

（3）所选编译器简介

（4）安装过程描述及截图

（5）本次实验的收获、体会、意见、建议等。

实验2. 简单Fortran 程序设计

1. 实验目的

在学习了几个章节后，编制若干简短程序，加深对课上内容的理解和掌握，并逐渐学会调试代码。

2. 实验内容

（1） 设某三角形三个顶点坐标分别为A （1.5，2.0），B （4.5,4.5），

C （18.0,10.5），编程求三角形面积和重心。（提示：重心坐标=(A+B+C)/3，

三角形面积可采用公式：S=)()()(c p b p a p p -⨯-⨯-⨯，p=（a+b+c ）/2）

输入运行下列程序代码，并给每行语句进行注释。

program main

complex:: da=(1.5,2.0)

complex:: db=(4.5,4.5)

complex::dc=(18.0,10.5)

complex::center

real a,b,c,p,area

center=(da+db+dc)/3.0

a=abs(dc-db)

b=abs(da-dc)

c=abs(db-da)

p=(a+b+c)/2.0

area=sqrt((p-a)*(p-b)*(p-c)*p)

write(*,*) center,area

end program main

(2)编程，显示一个4字节浮点数（二进制字符串）的符号位、阶

码、尾数。

(3)编程，求满足如下条件的三位数：它除以9的商等于它的各位

数字的平方和。例如224，它除以9的商为24，而22+22+42=24 输入并调试下面的完整程序：

program main

integer(kind=2) ge,shi,bai,shu,j,i

shu=999

do while(shu>99)

ge=mod(shu,10)

bai=shu/100

shi=(shu-bai*100)/10

j=shu/9

i=ge*ge+shi*shi+bai*bai

if(j==i) write(*,*) shu

shu=shu-1

enddo

end program main

(4) 编写程序，找出乘积为323的两个相邻的奇数。

(5) 编写程序，判断并输出1951-2020年间所有的闰年。

3. 实验报告内容

（1）实验目的

（2）实验内容

（3）各段程序代码及注释和运行结果

（4）本次实验的收获体会建议等

实验3. 函数

1.实验目的

（1）掌握subroutine的定义和基本使用方法。

（2）掌握function 的定义和基本使用方法。

（3）掌握利用module进行全局变量定义和使用的方法。

2.实验内容

（1）编写程序，从主程序输入两个整数，通过函数返回其最大公约数并显示；

（2）编程，主程序从键盘输入一行字符，在子程序中将非字母符号去除后显示。

（3）在module中定义三角形三个边的长度及三个内角，周长，面积等变量，在主程序中输入三个边的长度，在子程序中计

算其余变量的值。

（4）编写一段子程序，实现对任意实数数组的排序和输出

3.实验报告内容

（1）实验目的；实验内容；

（2）每个程序的代码以及运行结果

（3）本次实验的体会与收获

实验4 Fortran的数据文件操作-文本文件

1.实验目的

掌握Fortran语言文本文件的读写方法和技巧，为电法勘探数据处理打好基础。

2.实验内容

（1）编程，键盘输入10个数，将它们输出到一个文本文件中；

（2）从上面的文本文件读入10个数，对它们进行排序后输出到屏幕上。

3.实验报告内容

（1）实验目的

（2）实验内容

（3）自编程序的完整代码，运行过程描述及文件里的内容截图）

（4）本次实验的收获及体会。

实验5 Fortran的文件操作-二进制文件

1.实验目的

掌握Fortran语言二进制文件等文件的读写方法和技巧，为地震勘探数据处理打好基础。

2.实验内容

（1）编程，键盘输入10个数，将它们输出到一个二进制文件中；

（2）从上面的二进制文件读入10个数，对它们进行排序后输出到屏幕上。

（3）某类型数据文件的文件头总计3600字节，分别由3200个一字节整数和200个2字节整数组成，是编制程序显

示其前面那20个二字节的整数。

！实验报告内容

实验目的、实验内容、自编程序的完整代码，运行过程描述及文件里的内容截图、本次实验的收获及体会。