南京工程高等职业学校.docxVIP

南京工程高等职业学校 毕业设计开题报告 题目名称：关于FORTRAN搜索与排序算法 学生名称：张智杰学号：5系部：信息科学系专业：计算机应用技术班级：J04005指导教师：王正友职称：讲师2009年6月6月 摘要 FORTRAN,亦译为福传，是英文“FORmulaTRANslator”的缩写，译为“公式翻译器”，它是世界上最早出现的计算机高级程序设计语言，广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。 Fortran语言的最大特性是接近数学公式的自然描述，在计算机里具有很高的执行效率。 易学，语法严谨。 可以直接对矩阵和复数进行运算，这一点类似matlab。 自诞生以来广泛地应用于数值计算领域，积累了大量高效而可靠的源程序。 很多专用的大型数值运算计算机针对Fortran做了优化。 广泛地应用于并行计算和高性能计算领域。 Fortran90，Fortran95，Fortran2003的相继推出使Fortran语言具备了现代高级编程语言的一些特性。 所以，再此我们主要讨论fortran语言的基础，搜索与排序算法的种类与最简代码形式。 关键字：FORTRAN，顺序搜索，二分搜索，散列搜索，冒泡法等 目录 TOC\o1-5\h\z \o CurrentDocument 顺序搜索4 \o CurrentDocument 二分搜索8 散列排序11 \o CurrentDocument 冒泡法14 \o CurrentDocument 选择排序法15 19快速排序法 19 1.顺序搜索-顺序搜索是最简单的一种搜索算法，简单来说，就是将数据依次拿出来查找看是否有符合要求的结果。例如对于一组数据(n1,n2,n3,…,nn)，想要确定其中是否有数据m，则顺序搜索的做法如下： -先看第一个数据n1，如果n1=m则找到了所要找的数据，否则继续搜索； -接着看第二个数据n2,如果n2=m则找到了所要找的数据，否则继续搜索； ；-来看最后一个数据nn，如果nn=m则找到了要找的数据，否则打印没有搜索到合适的数据。 !顺序搜索的模块定义MODULESEARCH_MODULE IMPLICITNONE!接口说明 INTERFACESequence_Search MODULEPROCEDURESequence_Search_r MODULEPROCEDURESequence_Search_d MODULEPROCEDURESequence_Search_i ENDINTERFACECONTAINS!实数的顺序搜索 LOGICALFUNCTIONSequence_Search_r(A,G) IMPLICITNONE!变量定义 REAL::A(:),G INTEGER::N,I!搜索数据 N=SIZE(A) DOI=1,N IF(G==A(I))THENSequence_Search_r=.TRUE. RETURN ENDIF ENDDO Sequence_Search_r=.FALSE. RETURN ENDFUNCTIONSequence_Search_r!双精度数的顺序搜索LOGICALFUNCTIONSequence_Search_d(A,G)IMPLICITNONE!变量定义 REAL(8)::A(:),G INTEGER::N,I!搜索数据 N=SIZE(A) DOI=1,NIF(G==A(I))THENSequence_Search_d=.TRUE.RETURN ENDIF ENDDO Sequence_Search_d=.FALSE. RETURN ENDFUNCTIONSequence_Search_d!整数的顺序搜索LOGICALFUNCTIONSequence_Search_i(A,G)IMPLICITNONE!变量定义 INTEGER::A(:),G INTEGER::N,I!搜索数据 N=SIZE(A) DOI=1,NIF(G==A(I))THENSequence_Search_i=.TRUE.RETURN ENDIF ENDDO Sequence_Search_i=.FALSE. RETURN ENDFUNCTIONSequence_Search_iENDMODULESEARCH_MODULE!顺序搜索范例，调用以上模块的主程序PROGRAMTEST1601 USESEARCH_MODULE IMPLICITNONE!变量定义 INTEGER,ALLOCATABLE::I4(:) REAL,ALLOCATABLE::R4(:) REAL(8),ALLOCATABLE::R8(:) REAL::Temp INTEGER::Ig REAL::Rg REAL(8)::