《地球物理勘探数据处理程序设计》由会员分享，可在线阅读，更多相关《地球物理勘探数据处理程序设计（7页珍藏版）》请在金锄头文库上搜索。
1、中国矿业大学资源学院地球物理数据处理程序设计实验报告班级姓名学号实验 1 Fortran 编译器的安装使用1. 实验目的编译器是将程序代码翻译成机器语言的工具，而IDE是将代码的 编辑编译连接以及运行集成于一体的集成开发环境。由于计算机操作 系统不断的发展，原有的编译器很大可能不能适应新的操作系统。本 实 验 的 目 的 在 于 使 学 生 能 够 根 据 具 体 的 操 作 系 统 （xp,win7,win8,win10,linux 等）选择并获得合适的编译器产品， 安装在个人电脑上，并能成功运行第一个简单程序。2. 实验内容（1）根据电脑的具体操作系统配置，选择合适的编译器（2）完成该编译
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 Px (P -a)x (P
3、 -b)x (P -c), p=( a+b+c) /2)输入运行下列程序代码，并给每行语句进行注释。program maincomplex: da=(1.5,2.0)complex: db=(4.5,4.5)complex:dc=(18.0,10.5)complex:centerreal a,b,c,p,areacenter=(da+db+dc)/3.0a=abs(dc-db)b=abs(da-dc)c=abs(db-da)p=(a+b+c)/2.0area=sqrt(p-a)*(p-b)*(p-c)*p)write(*,*) center,areaend program main(2) 编程
4、，显示一个4 字节浮点数(二进制字符串)的符号位、阶 码、尾数。(3) 编程，求满足如下条件的三位数：它除以9 的商等于它的各位 数字的平方和。例如 224，它除以 9 的商为 24，而 22+22 +42 =24 输入并调试下面的完整程序：program maininteger(kind=2) ge,shi,bai,shu,j,ishu=999do while(shu99)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
5、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）编程，主程序从键盘输入一行字符，在子程序
6、中将非字母符 号去除后显示。（3）在module中定义三角形三个边的长度及三个内角，周长， 面积等变量，在主程序中输入三个边的长度，在子程序中计 算其余变量的值。（ 4 ）编写一段子程序，实现对任意实数数组的排序和输出3. 实验报告内容（ 1 ）实验目的；实验内容；（2）每个程序的代码以及运行结果（3）本次实验的体会与收获实验 4 Fortran 的数据文件操作-文本文件1. 实验目的掌握 Fortran 语言文本文件的读写方法和技巧，为电法勘探数据 处理打好基础。2. 实验内容（1）编程，键盘输入10 个数，将它们输出到一个文本文件中；（2）从上面的文本文件读入10 个数，对它们进行排序后输
7、出 到屏幕上。3. 实验报告内容（1）实验目的（2）实验内容（3）自编程序的完整代码，运行过程描述及文件里的内容截 图）（4）本次实验的收获及体会。实验 5 Fortran 的文件操作-二进制文件1. 实验目的掌握 Fortran 语言二进制文件等文件的读写方法和技巧，为地震 勘探数据处理打好基础。2. 实验内容（1）编程，键盘输入 10 个数，将它们输出到一个二进制文件 中；（2）从上面的二进制文件读入10 个数，对它们进行排序后输 出到屏幕上。（3）某类型数据文件的文件头总计 3600 字节，分别由 3200 个一字节整数和 200 个 2 字节整数组成，是编制程序显 示其前面那 20 个二字节的整数。！实验报告内容 实验目的、实验内容、自编程序的完整代码，运行过程描述及文 件里的内容截图、本次实验的收获及体会。
