Fortran的主要版本及差别

几种Fortran 编译器---------------------------------------------------------------------------------------1.CVFCompaq Visual Fortran （CVF）, 当今PC平台上功能相当强大与完整的Fortran程序开发工具，还用于Abaqus的开发。

1997年，微软将Fortran PowerStation卖给DEC之后，微软就不再出版Fortran编译器了。

后来DEC并入了Compaq，再后来Compaq又和HP合并了。

现在最新的版本是HP出的Fortran for Windows v6.6，现在HP/Compaq已经不再开发Fortran了，CVF 6.6是最终的版本了，Compaq的Fortran开发小组已经投入Intel旗下，目前Intel已经有Intel Visual Fortran 11.0。

Compaq Visual Fortran 6.6官方的单价也相当昂贵。

Compaq Visual Fortran 6.6 下载：/SoftDown.asp?ID=11937Compaq Visual Fortran 6.6 绿色版下载：/down/10915.htmlCompaq Visual Fortran 6.5 下载：/soft/fortran6.5.rarftp://2006:2006@/36/-002124.rar---------------------------------------------------------------------------------------2. IVFIntel Visual Fortran (IVF)将Compaq Visual Fortran* (CVF) 语言的丰富功能与英特尔代码生成及优化技术结合在一起。

目前Intel已经有Intel Visual Fortran 11.0。

FORTRAN，亦译为福传，是英文“FORmula TRANslator”的缩写，译为“公式翻译器”，它是世界上最早出现的计算机高级程序设计语言，广泛应用于科学和工程计算领域。

FORTRAN 语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。

目录FORTRAN开发历史Fortran的版本Fortran的特性Fortran语言的Hello World程序Fortran编译器Fortran程序包Fortran的将来FORTRAN开发历史早在1951年，美国IBM公司约翰·贝克斯(John Backus)针对汇编语言的缺点着手研究开发FORTRAN语言，并于1954年在纽约正式对外发布。

称约翰·贝克斯提出的FORTRAN语言为FORTRANⅠ，FORTRANⅠ虽然功能简单，但它的开创性工作，在社会上引起了极大的反响。

到1957年第一个FORTRAN编译器在IBM704计算机上实现，并首次成功运行了FORTRAN程序。

在1958年，对FORTRANⅠ进行了扩充和完善，引进了子函数等概念，推出了商业化的FORTRANⅡ版本。

之后，FORTRAN语言发展迅速，多种版本相继在其它计算机上实现。

在1962年，推出了FORTRAN Ⅳ。

FORTRAN Ⅳ没有充分考虑兼容性，导致FORTRANⅡ程序不能在FORTRAN Ⅳ系统中运行，使其应用受到了很大限制，这时语言不兼容性问题和影响被突出表现出来。

此前也出现过FORTRAN Ⅲ，但由于存在严重缺陷，没有在计算机上实现。

随着FORTRAN语言版本的不断更新和变化，语言不兼容性问题日益突出，语言标准化工作被提上了日程。

1962年5月，美国标准化协会(简称ANSI)成立相关机构着手进行FORTRAN语言标准化的研究工作，并于1966年正式公布了两个标准文本：美国国家标准FORTRAN(ANSI X3.9-1966)和美国国家标准基本FORTRAN(ANSIX3.10-1966)，前者相当于FORTRAN Ⅳ，后者相当于FORTRANⅡ。

我的Fortran基本用法小结周日, 10/14/2007 - 21:00 — gator一、说明二、概述三、数据类型及基本输入输出四、流程控制五、循环六、数组七、函数八、文件一、说明本文多数内容是我读彭国伦《Fortran 95 程序设计》的笔记。

只读到第九章，主要是3~9章，都是最基本的用法（原书共16章）。

这里主要摘录了我看书过程中总结的一些Fortran和C不同的地方，主要是语法方面。

希望这份笔记能够给学过C但没有接触过Fortran的同学带去一些帮助。

要想得更清楚些，推荐看一下原书，觉得作者真的写得很好，很清楚；如果有C语言的基础，看完前九应该很快的，花一两天就行了。

觉得如果耐心看完本文，基本功能应该也可以顺利用起来了。

外，由于我之前没有用过Fortran，这次为了赶文档看书又看得很粗浅，大多数东西看过之后都没得及仔细想，只是按着作者的意思去理解。

所以这份笔记还处于纸上谈兵的层次。

如果有不妥的方，希望大家指正。

谢谢！文中蓝色的部分是程序代码，!后面的内容为注释。

二、概述1、名词解释Fortran=For mula Tran slator/Translation一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。

的确，从一开始，IBM设计的时候就是为了方便数值计算和科学数据处理。

设计强大的数组操作就是为了实现这一目标。

ortran奠定了高级语言发展的基础。

现在Fortran在科研和机械方面应用很广。

2、Fortran的主要版本及差别按其发展历史，Fortran编译器的版本其实很多。

现在在广泛使用的是Fortran 77和Fortran90。

ortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。

鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看77程序。

以下是77和90的一些格式上的区别。

【以下文字转载自D_Atmosphere 讨论区】【原文由superjyq 所发表】我的Fortran基本用法小结高级语言和算法组heavensky目录：一、说明二、概述三、数据类型及基本输入输出四、流程控制五、循环六、数组七、函数八、文件一、说明本文多数内容是我读彭国伦《Fortran 95 程序设计》的笔记。

只读到第九章，主要是3~9章，都是些最基本的用法（原书共16章）。

这里主要摘录了我看书过程中总结的一些Fortran和C不同的地方，主要是语法方面。

希望这份笔记能够给学过C但没有接触过Fortran的同学带去一些帮助。

要想弄得更清楚些，推荐看一下原书，觉得作者真的写得很好，很清楚；如果有C语言的基础，看完前九章应该很快的，花一两天就行了。

觉得如果耐心看完本文，基本功能应该也可以顺利用起来了。

另外，由于我之前没有用过Fortran，这次为了赶文档看书又看得很粗浅，大多数东西看过之后都没来得及仔细想，只是按着作者的意思去理解。

所以这份笔记还处于纸上谈兵的层次。

如果有不妥的地方，希望大家指正。

谢谢！文中蓝色的部分是程序代码，!后面的内容为注释。

二、概述1、名词解释Fortran=Formula Translator/Translation一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。

的确，从一开始，IBM设计它的时候就是为了方便数值计算和科学数据处理。

设计强大的数组操作就是为了实现这一目标。

Fortran奠定了高级语言发展的基础。

现在Fortran在科研和机械方面应用很广。

2、Fortran的主要版本及差别按其发展历史，Fortran编译器的版本其实很多。

现在在广泛使用的是Fortran 77和Fortran90。

Fortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。

鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看懂77程序。

[转载]Fortran程序基本特点及不同版本之间的区别原⽂地址：Fortran程序基本特点及不同版本之间的区别作者：caodanping_7141、F77和F90的区别名称：F77固定格式（fixed format），程序代码扩展名：.f或.for，F90⾃由格式（free format），扩展名：.f90格式：F77每⾏前六个字符不写程序代码，可以空着或者1-5字符使⽤数字来标注⾏代码（⽤作格式化输⼊出等），7-72为程序代码编写区，73⾏后被忽略，超过的话可以续⾏，F90每⾏可132字符注释：F77以C,c或*开头的⾏被当成注释；F90以"!"引导注释，也可放在⾏尾续⾏：F77所续⾏的第六个字符是"0"以外的字符，通过⽤+表⽰，F90以&续⾏，放在该⾏末或下⾏初均可变量名：F77⽀持6个字符长，F90⽀持31个字符长常数：F90中PARAMETER可以做形容词，和变量声明同时写在⼀起Real, parameter :: pi=3.1415926关系运算符：F90： == /= > >= < <= (更接近标准的数学符号)F77： .EQ. .NE. .GT. .GE. .LT. .LE.逻辑运算符：.AND. .OR. .NOT. .EQV. .NEQV.变量声明赋值：（1）integer： kind=1,2,4（长整型）F90: integer(kind=2) aInteger(kind=4)::a=15（加上两个冒号可以在定义时就直接赋值）F77: integer*2 b or integer(2) c⽤DATA命令单独赋值（属于声明），data b,c /1, 2.0/Fortran规定变量名以字母IJKLMN六个字母开头的即认为是整型变量（I-N规则），其他字母开头的为实型变量（2）real：kind=4，8（双精度）/real* 8=double precision(1.23E3/1.23D3)F90：real(kind=4) a， F77：real*4 a or real(4) a（3）complex kind=4，8（双精度）F90: complex(kind=4) a a=(3.1,2.5)（4）character len为最⼤长度(26个字母，数字0-9，专⽤字符13个：空格'$()+-*/,=.:)F90: character(len=10) c c=”Hello”， F77: c=’Hello’（5）logical kind=4,2（最少只需要1即可）F90: logical(kind=4) a a=.true.（6）⾃定义类型type：类似于C中的structF90: type::person ……引⽤时变量和元素直接以%区隔，visual fortran可以⽤.来表⽰全局变量全局变量：F77采⽤command来声明全局变量，编译器只提供内存共享⽽不去检查数据类型，使⽤时需要注意定义的是否⼀主程序和主程序中致，⽽F90则提供了module（不是函数，⽤于封装程序模块），可以把全局变量都声明在module中，这样主程序和主程序中就不需要编写重复的程序代码来声明全局变量就不需要编写重复的程序代码来声明全局变量了，函数在需要使⽤时只需要⽤use来调⽤该module_name即可：module module_name...end module还可以把功能上相关的函数放在同⼀个module模块中，程序想要调⽤时use该module才能调⽤，这样⽐较符合模块化的概念，在该module中⽤contains引导函数即可。

Fortran学习总结- 我不是企鹅的日志- 网易博客Fortran学习总结目录：一、说明二、概述三、数据类型及基本输入输出四、流程控制五、循环六、数组七、函数八、文件一、说明本文多数内容是读彭国伦《Fortran 95 程序设计》的笔记。

二、概述1、名词解释Fortran=Formula Translator/Translation一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。

的确，从一开始，IBM设计的时候就是为了方便数值计算和科学数据处理。

设计强大的数组操作就是为了实现这一目标。

fortran奠定了高级语言发展的基础。

现在Fortran在科研和机械方面应用很广。

2、Fortran的主要版本及差别按其发展历史，Fortran编译器的版本其实很多。

现在在广泛使用的是Fortran 77和Fortran90。

ortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。

鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看77程序。

以下是77和90的一些格式上的区别。

Fortran 77：固定格式（fixed format），程序代码扩展名：.f或.for（1）若某行以C,c或*开头，则该行被当成注释；（2）每行前六个字符不能写程序代码，可空着，或者1~5字符以数字表明行代码（用作格式化输入出等）；7~72为程序代码编写区；73往后被忽略；（3）太长的话可以续行，所续行的第六个字符必须是"0"以外的任何字符。

Fortran 90：自由格式（free format），扩展名：.f90（1）以"!"引导注释；（2）每行可132字符，行代码放在每行最前面；（3）以&amp;续行，放在该行末或下行初。

以下都是讨论Fortran 90。

3、Fortran的一些特点，和C的一些不同其实很多，在下面涉及具体方面时可以看到。

一、Fortran的发展历史Fortran（Formula Translation）是一种编程语言，最初在1950年代由IBM开发。

它是世界上第一种广泛使用的高级编程语言，专门用于科学和工程计算。

Fortran的发展和演变可以追溯到上世纪50年代。

1. 1954年，IBM开发了Fortran 0的原型，并在1957年发布了Fortran I版本。

这是世界上第一种高级编程语言，为科学和工程计算提供了便利。

2. 1962年发布了Fortran II版本，引入了子程序（subroutines）和函数（functions）的概念。

这为程序员提供了更大的灵活性和模块化的能力。

3. 1966年发布了Fortran 66版本，这是第一个被ANSI（美国国家标准协会）认可的Fortran标准。

它引入了更多的数学函数、标准化输出和输入，以及更好的程序结构。

4. 1977年发布了Fortran 77版本，这个版本增加了对结构化编程的支持，引入了逻辑表达式、控制结构和一些新的内建函数。

5. 1990年发布了Fortran 90版本，这个版本是最重大的变革之一。

它引入了模块化的概念、动态内存分配、指针、以及其他一些现代编程语言所具备的特性。

6. 2004年发布了Fortran 2003版本，新增了一些新的特性，如对C 语言的互操作性、新的数组操作符等。

还引入了一些更为现代的编程特性，如异常处理、并行编程等。

7. 目前最新的版本是Fortran 2018，它在之前版本的基础上进一步完善和扩展了一些功能，使得Fortran更适合于现代科学和工程计算的需求。

二、C语言的发展历史C语言是一种通用的高级编程语言，由美国计算机科学家丹尼斯·里奇（Dennis Ritchie）于20世纪70年代初在贝尔实验室设计开发。

C 语言的设计目标是提供一种能以简洁方式编写系统软件的编程语言。

1. 1972年，贝尔实验室的丹尼斯·里奇开始设计C语言，并在1978年正式发布了第一个正式的C语言标准。

Fortran语言FORTRAN语言是世界上第一个被正式推广使用的高级语言。

它是1954年被提出来的，1956年开始正式使用，至今已有三十多年的历史，但仍历久不衰，它始终是数值计算领域所使用的主要语言。

FORTRAN语言是Formula Translation的缩写，意为“公式翻译”。

它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的问题而设计的，其数值计算的功能较强。

FORTRAN语言问世以来，根据需要几经发展，先后推出了不同的版本，其中最流行的是1958年出现的FORTRANⅡ和1962年出现的FORTRANⅣ。

1966年美国标准化协会(ANSI)公布了两个美国标准文本：•标准FORTRAN（X3.9-1966）。

大致相当于FORTRANⅣ。

•标准基本FORTRAN（X3.10-1966）大致相当FORTRANⅡ。

1972年国际标准化组织(ISO)接受了美国标准，在稍加修改后公布了ISO FORTRAN标准，即《程序设计语言FORTRAN ISO 1539-1972》，它分为三级，即：• 完全的(一级)FORTRAN，相当于FORTRANⅣ。

• 中间的(二级)FORTRAN，介于FORTRANⅡ和FORTRANⅣ之间。

• 基本的(三级)FORTRAN，相当于FORTRANⅡ。

FORTRANⅣ(即FORTRAN 66)流行了十几年，几乎统治了所有的数值计算领域，许多应用程序和程序库都是用FORTRANⅣ语言编写的。

美国标准化协会(ANSN)在1976年对ANSI FORTRAN(X3.9-1966)进行了修订，预定在1977年通过，为了区别于FORTRAN 66，新标准定名为FORTRAN 77。

实际上到1978年4月才由ANSI正式公布作为新的美国国家标准。

即FORTRAN(X3.9-1978)。

1980年，FORTRAN 77被接受为国际标准，即《程序设计语言FORTRAN ISO 1539-1980》，该标准分为全集和子集。

Fortran是一种编程语言，已经存在多年。

自上世纪50年代问世以来，它一直是科学和工程领域中最流行的编程语言之一。

尽管Fortran语言历史悠久，但它仍然在不断发展。

Fortran 2020是该语言的最新版本，它引入了许多新特性和改进，以适应现代计算的需求。

1. 特性Fortran 2020引入了许多新的特性，包括对内存分配和处理器处理能力的增强。

它还引入了一些并行编程的新特性，这些特性使得在多核计算机上编写并行代码变得更加容易。

Fortran 2020还引入了一些新的数学函数和操作符，以及一些改进的标准库函数。

2. 性能优化Fortran 2020还引入了一些性能优化的特性，这些特性使得编写高性能代码变得更加容易。

新的语言特性和编译器优化使得Fortran代码在现代计算机上的性能得到了进一步提升。

这对于需要进行大规模科学计算的应用程序来说是非常重要的。

3. 编译器支持Fortran 2020需要新的编译器来支持它的新特性。

现有的一些编译器已经更新了他们的版本，以支持Fortran 2020的新特性。

这些新的编译器可以对Fortran 2020代码进行静态分析和优化，并生成针对现代处理器的高效机器代码。

4. 兼容性Fortran 2020与以前的版本保持了很好的兼容性。

这意味着大部分现有的Fortran代码可以无缝地迁移到Fortran 2020。

这为那些已经有大量现有代码库的项目提供了一个平滑的升级路径。

5. 应用领域Fortran 2020的新特性使得它在一些应用领域中变得更加有吸引力。

在天气预报、气候建模、核能研究、航空航天等领域，Fortran一直是一种非常流行的编程语言。

新的并行编程特性和性能优化使得Fortran 2020在这些领域中有望得到更广泛的应用。

总结Fortran 2020是该语言的一个重要里程碑，它为科学和工程应用程序带来了许多新的特性和改进。

新的并行编程特性、性能优化和编译器支持使得Fortran 2020成为现代科学计算的一个强大工具。

、Fortran的主要版本及差别按其发展历史，Fortran编译器的版本其实很多。

现在在广泛使用的是Fortran 77和Fortran90。

Fortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。

鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看懂77程序。

以下是77和90的一些格式上的区别。

Fortran 77：固定格式（fixed format），程序代码扩展名：.f或.for （1）若某行以C,c或*开头，则该行被当成注释；（2）每行前六个字符不能写程序代码，可空着，或者1~5字符以数字表明行代码（用作格式化输入输出等）；7~72为程序代码编写区；73往后被忽略；（3）太长的话可以续行，所续行的第六个字符必须是"0"以外的任何字符。

Fortran 90：自由格式（free format），扩展名：.f90（1）以"!"引导注释；（2）每行可132字符，行代码放在每行最前面；（3）以&续行，放在该行末或下行初。

以下都是讨论Fortran 90。

3、Fortran的一些特点，和C的一些不同其实很多，在下面涉及具体方面时可以看到。

这里只是大致提一些。

（1）不分大小写（2）每句末尾不必要写分号（3）程序代码命令间的空格没有意义（4）不像C，Fortran不使用{ }（5）数据类型多出了复数和逻辑判断类型。

比如复数类型complex :: a !声明复数的方法。

复数显然方便了科学计算，满足了工程方面的需求a=, ! a=1+i（6）多出了乘幂运算（**）。

乘幂除了整数还可以是实数形式。

如开方，开立方a=**，a=**。

（7）数组有一些整体操作的功能；可以方便的对部分元素进行操作（8）有些情况下可以声明大小待定的数组，很实用的功能4、Fortran的基本程序结构先看一看所谓的"Hello Fortran"程序。

Fortran用法小结目录：一、说明二、概述三、数据类型及基本输入输出四、流程控制五、循环六、数组七、函数八、文件一、说明本文多数内容是我读彭国伦《Fortran 95 程序设计》的笔记。

只读到第九章，主要是3~9 章，都是最基本的用法（原书共16章）。

这里主要摘录了我看书过程中总结的一些Fortran 和C不同的地方，主要是语法方面。

希望这份笔记能够给学过C但没有接触过Fortran的同学带去一些帮助。

要想得更清楚些，推荐看一下原书，觉得作者真的写得很好，很清楚；如果有C语言的基础，看完前九应该很快的，花一两天就行了。

觉得如果耐心看完本文，基本功能应该也可以顺利用起来了。

外，由于我之前没有用过Fortran，这次为了赶文档看书又看得很粗浅，大多数东西看过之后都没得及仔细想，只是按着作者的意思去理解。

所以这份笔记还处于纸上谈兵的层次。

如果有不妥的方，希望大家指正。

谢谢！文中蓝色的部分是程序代码，!后面的内容为注释。

二、概述1、名词解释Fortran=Formula Translator/Translation一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。

的确，从一开始，IBM设计的时候就是为了方便数值计算和科学数据处理。

设计强大的数组操作就是为了实现这一目标。

Fortran奠定了高级语言发展的基础。

现在Fortran在科研和机械方面应用很广。

2、Fortran的主要版本及差别按其发展历史，Fortran编译器的版本其实很多。

现在在广泛使用的是Fortran 77和Fortr an90。

Fortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。

鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看77程序。

以下是77和90的一些格式上的区别。

Fortran 77：固定格式（fixed format），程序代码扩展名：.f或.for（1）若某行以C,c或*开头，则该行被当成注释；（2）每行前六个字符不能写程序代码，可空着，或者1~5字符以数字表明行代码（用作格式化输入出等）；7~72为程序代码编写区；73往后被忽略；（3）太长的话可以续行，所续行的第六个字符必须是"0"以外的任何字符。

fortran 2003Fortran 2003是Fortran编程语言的一个重要版本，它引入了许多新的特性和改进，为Fortran程序员提供了更多的功能和灵活性。

以下是一些关于Fortran 2003的重要特性和用法的相关参考内容：1. 模块化编程：Fortran 2003引入了模块化编程的概念，使得程序的组织更加清晰，模块可以包含类型、变量、子程序等。

这样的特性使得代码的维护和重用变得更加容易。

同时，模块的私有性和共享性的控制也可以提高代码的安全性。

2. 动态内存分配：Fortran 2003引入了动态内存分配的特性，即程序可以在运行时动态地分配和释放内存。

这对于动态数据结构的使用非常有帮助，如链表和树等。

动态内存分配还可以提高程序的灵活性和性能。

3. 指针：Fortran 2003引入了指针的概念，使得程序员可以更加灵活地处理内存和数据。

指针可以用于动态分配内存，也可以用于引用子程序的参数。

指针的引入使得Fortran可以更好地与其他编程语言进行交互。

4. 异常处理：Fortran 2003引入了异常处理的特性，可以通过使用异常处理机制来捕获和处理运行时的错误。

异常处理可以提高程序的稳定性和可靠性，使得程序在面临异常情况时能够正确地做出响应。

5. 流程控制：Fortran 2003引入了循环退出语句和条件编译等流程控制特性。

循环退出语句使得程序员可以在任何位置提前跳出循环，从而提高程序的效率。

条件编译则可以根据特定的编译选项来选择性地编译程序的某些部分。

6. 模板和运算符重载：Fortran 2003引入了类似于C++的模板和运算符重载的特性，使得程序员可以更灵活地定义和使用自己的数据类型和运算符。

模板和运算符重载可以提高代码的可读性和可维护性。

7. 多线程编程：Fortran 2003支持多线程编程，可以利用多核处理器的并行计算能力。

多线程编程可以提高程序的性能和响应能力，但也需要程序员具备一定的并发编程技巧。

（转）不是fortran不行，只是我们知道的太少展开全文一、总论直到现今，fortran仍然是土木、水利类工科同学学习计算机语言的首选，除了因为它传统的超强的计算功能，更因为它是最早的计算机高级编程语言，所以广阔的已经成形的计算资源，如各种计算软件等都是由其编译而来，所以，至少在很长一段时间内，fortran仍将活跃在世上，而不会为C/C++、VB等取代。

有必要提一下fortran的基本知识，这些在我们上课的时候可能都没有涉及。

fortran语言规范与编译器的区别：fortran主要的语言规范有fortran77、fortran90以及fortran2003，其中，目前学生学习主要是fortran90规范，因为fortran77实在是太古老了，在其改革到fortran90之后，fortran加入了指针等C/C++中的东西，使得fortran学习、使用起来更为方便，但是这并不是说fortran77就不行了或是怎么的，事实上，众多的使用fortran的研究人员仍然使用着它，譬如说国家地理信息等行业的人员，他甚至可能会对fortran的后续语言规范嗤之以鼻，毕竟这种改变并不能使他的SCI论文增加多少的。

值得一提的是，fortran2003语言规范的出台着实让众多学习fortran 的童鞋们为之一振，因为它标志着fortran也迈入了面向对象程序设计语言的行列，不过关于它的介绍还不是很多，我在J.Chapmen的fortran95程序设计一书的最后看到了相关介绍，之所以这样，主要是支持fortran2003语言规范的编译器还没有公司开发出来，所以这是一个pity。

其次，再说一下fortran编译器的方面。

fortran目前使用的主流编译器为compaq visual fortran系列，intel fortran系列，powerstation ，DVF系列等（我们老师给的应该是DVF5.0），其中，compaq公司被intel收购之后，就生产intel fortran系列了，而powerstation系列属于微软的产品，比较经典的是powerstation4.0，它使得利用windows的内置资源制作友好的图形用户界面以及强大的图形处理能力成为现实。

[转载]Fortran 77, C, C++ 和 Fortran 90 的比较收藏发信人: quasar (飞贼克斯), 信区: Fortran标题: Fortran 77, C, C++ 和 Fortran 90 的比较(转载)发信站: 南京大学小百合站 (Tue Jun 1 10:59:14 2004)瀚海星云 -- 文章阅读 [讨论区: MathTools]发信人: HuiCai (老灰菜), 信区: SciComp标题: Fortran 77, C, C++ 和 Fortran 90 的比较(转载)发信站: 瀚海星云 (2002年12月19日10:40:38 星期四), 站内信件【以下文字转载自 Fortran 讨论区】【原文由 HuiCai 所发表】Fortran 77, C, C++ 和 Fortran 90 的比较/develop/article/16/16085.shtm三十年来, 从 Fortran 77 开始, Fortran 成为了计算科学的主要语言.在这段时间里, Fortran 的数值能力变得非常稳定而且优于其它计算机语言; 最大的改变来自于不断增长的各种可靠的数值过程库的种类. Fortran 联合(union), 它的使用技巧, 扩充的数值库为计算科学赋予了良好的基础.可是在过去十几年中, 动态数据结构(特别是动态数组)的重要性不窜上升, UNIX 工作站, 复杂的交互式可视化工具, 以及更近的并行体系结构--Fortran 77 都没有实现--刺激了其它语言作为计算语言的使用, 最明显的一个例子是C. 最近C++ 也已经引起人们的兴趣, Fortran 通过发展到 Fortran 90来弥补它在现代科学计算方面的不足. 这部分的一个通常的工作是比较四种语言对科学计算的适应性的, 这四种语言是两个C 的代表(C, C++) 和两个Fortran的代表(Fortran 77, Fortran 90). 下面的表格总结了这种比较, 后面的内容试图合理地解释这种等级排序, 从最好(1)到最差(4)..功能 ------------ F77 - C - C++ - F90数值健壮性 ---- 2 ---- 4 --- 3 ----- 1数据并行性 ---- 3 ---- 3 --- 3 ----- 1数据抽象 ------- 4 ---- 3 --- 2 ----- 1面向对象编程 - 4 ---- 3 --- 1 ----- 2函数型编程 ---- 4 ---- 3 --- 2 ----- 1平均等级 ------ 3.4 - 3.2 - 2.2 -- 1.21 数值健壮性Numeric Polymorphism(数值多态性)中是一个给定一个通用名称的几种版本的图形平滑过程的例子. 这里描述的通用能力是作为Fortran 90提供的一种额外的数值健壮性超过Fortran 77和C的特性. Fortran 77, Fortran 90 , 和 C 版本的SMOOTH子过程也在下面给出, 用于比较. (注意, Fortran 90版使用了第4部分描述的并行性)数值多态性, 加上实际类型的参数, 小数精度选择, 和数字环境变量检查等, 证明了Fortran 90排在这四种语言中的第一位. Fortran 77 列在第二为的原因在于它支持复杂变量, 这在很多计算科学应用中是很重要的. C ++ 把 C 挤出了第三位是由于它在通常领域多态性上的能力.2 数据并行化部分在这四种语言中, 只有Fortran 90具有对科学计算有价值的数据并行能力; 其它三种语言在这方面的特性基本上是一样的, 即全都没有. 这解释了四种语言在这个方面的排名.这里是完成高斯消去的一套Fortran 77 和 C 过程:****************************************************************** 编程决定正确的子过程处理过程: pivot.f , triang.f , 和 back.f. ** 子过程决定一系列同步方程的解*******************************************************************234567PROGRAM testgINTEGER IMAX, JMAXPARAMETER (IMAX = 3, JMAX = 4)REAL matrix(IMAX, JMAX)REAL matrix(IMAX)INTEGER i, j, nDATA ( ( matrix(i,j), j = 1, JMAX), i = 1, IMAX)+ /-1.0, 1.0, 2.0, 2.0, 3.0, -1.0, 1.0, 6.0,+ -1.0, 3.0, 4.0, 4.0/n = IMAXwrite(*,*) \"The original matrix,\",n,\"by\",n=1,\":\"call wrtmat(matrix, n, n +1)call pivot(matrix, n)write(*,*) \"The matrix after pivoting:\"call wrtmat(matrix, n, n +1)call triang(matrix, n)write(*,*) \"The matrix after lower triangulation:\"call wrtmat(matrix, n, n + 1)call back(solvec, matrix, n)write(*,*) \"The solution vector after back substitution:\"write(*,*) \"********************************************\"write(*,*) (solvec(i), i = 1, n)write(*,*) \"********************************************\"end******************************************************************** *子过程决定第一列系数矩阵的最大值, 把最大值所在的行和第一行交换, **处理器然后重复对其他的行和列做这种处理, 对于每一次叠代, 列的位置**和行的位置增加一(即, 第1行-第1列, 然后第2行-第2列, 然后第3行-第 **3列, 等 ********************************************************************* *234567SUBROUTINE pivot(matrix, n)INTEGER i, j, k, nREAL matrix(n, n + 1), maxval, tempvaldo 10, j = 1, nmaxval = matrix(j,j)do 20, i = j + 1, nif (maxval .lt. matrix(i,j)) thenmaxval = matrix(i,j)do 30, k = 1, n + 1tempval = matrix(i,k)matrix(i,k) = matrix(j, k)matrix(j,k) = tempval30continue20 continue10 continueend****************************************完成一个输入矩阵的低级分解的子过程 *****************************************234567SUBROUTINE triang(matrix, n)INTEGER i, j, k, nREAL matrix(n, n + 1), pivot, pcelemdo 10, j = 1, npivot = matrix(j,j)do 20, k = j + 1, n + 1matrix(j,k) = matrix(j,k) / pivot20 continuedo 30, i = j + 1, npcelem = matrix(i,j)do 40, k = j + 1, n + 1matrix(i,k) = matrix(i,k) - pcelem * matrix(j,k)40 continue30continueend********************************************************** * 子过程从一个已经经历了低级分解的参数矩阵计算一个解向量 *********************************************************** *234567SUBROUTINE back(solvec, matrix, n)REAL solvec(n), matrix(n, n + 1), sumsolvec(n) = matrix(n, n + 1)do 10, i = n -1, 1, -1sum = 0.0do 20, j = i + 1, nsum = sum + matrix(i, j) * solvec(j)20 continuesolvec(i) = matrix(i, n + 1) - sum10 continueend*********************************************************** * 测试子过程bisec.f的程序, bisec.f 决定一个方程(f.f中)的解** 可是这个函数确实假设函数-f由两个值支撑. 即在用户给定的终** 点之间的解不超过一个************************************************************ *234567PROGRAM testbsREAL xleft, xrightREAL fEXTERNAL fwrite(*,*) \"Please enter an initial left and right value:\"read(*,*) xleft, xrightcall bisec(f, xleft, xright)end这里是同一个算法的C 过程:/********************************************************* 决定三个函数(pivot.c, triang.c, back.c)正确处理的程序 ** 这些函数决定了一系列同步方程的解*********************************************************/#include <stdio.h>#define IMAX 3#define JMAX 4float matrix[IMAX][JMAX] = {{-1.0, 1.0, 2.0, 2.0 },{3.0, -1.0, 1.0, 6.0 },{-1.0, 3.0, 4.0, 4.0 }};float solvec[IMAX] = { 0.0, 0.0, 0.0 };main(){void wrt_output(void);void pivot(void);void triang(void);void back(void);void wrt_vector(void);(void)printf("The original matrix %d by %d :\n", IMAX, JMAX);(void)wrt_output();(void)pivot();(void)printf("The matrix after pivoting:\n");(void)wrt_output();(void)triang();(void)printf("The matrix after lower decomposition:\n");(void)wrt_output();(void)back();(void)printf("The solution vector after back substitution:\n");(void)wrt_vector();}/*********************************************************** * 决定参数矩阵中第一列的最大元素并移动第一列含有最大值的行 ** 到第一行. 然后重复对其他的行和列做这种处理, 对于每一次叠 ** 代, 列的位置和行的位置增加一(即, 第1行-第1列, 然后第2行- ** 第2列, 然后第3行-第3列, 等*************************************************************/ void pivot(){int i, j, k;float maxval, tempval;for(j = 1; j < IMAX; j++) {maxval = matrix[j][j];for ( i = (j + 1); i < IMAX; i++) {if ( maxval < matrix[i][j] ) {maxval = matrix[i][j];for( k = 0; k <= IMAX; k++) {tempval = matrix[i][k];matrix[i][k] = matrix[j][k];matrix[j][k] = tempval;}}}}}/************************************ 完成一个输入矩阵的低级分解的函数 *************************************/void triang(void){int i, j, k;float pivot, pcelem;for ( j = 0; j < IMAX; j++) {pivot = matrix[j][j];for ( k = ( j + 1 ); k <= IMAX; K++) {matrix[j][k] = matrix[j][k] / pivot;}for ( i = ( j + 1 ); i < IMAX; i++) {pcelem = matrix[i][j];for ( k = ( j + 1 ); k <= IMAX; k++) {matrix[i][k] = matrix[i][k] - ( pcelem * matrix[j][k] );}}}}/********************************************************* * 子过程从一个已经经历了低级分解的参数矩阵计算一个解向量 **********************************************************/ void back(void){int i, j;float sum;solvec[IMAX - 1] = matrix[IMAX - 1][JMAX -1];for ( i = (IMAX -1); i > -1; i--) {sum = 0.0;for ( j = (i + 1); j < IMAX; j++) {sum = sum + matrix[i][j] * solvec[j];}solvec[i] = matrix[i][IMAX] - sum;}}void wrt_output(void){int i, j;(void)printf("**************************************\n");for ( i = 0; i < IMAX; i++) {for ( j = 0; j < (JMAX - 1); j++) {(void)printf("%f", matrix[i][j]);}(void)printf("%f\n", matrix[i][JMAX - 1]);}(void)printf("****************************************\n"); }void wrt_vector(void);{(void)printf("*************************************\n");(void)printf("%f", solvec[0]);(void)printf(" %f", solvec[1]);(void)printg(" %f\n", solvec[2]);(void)printf("****************************************\n");}/************************************************************ 测试函数bisec.f的程序, bisec.f 决定一个方程(f中)的解** 可是这个函数确实假设函数-f由两个值支撑. 即在用户给定的终 ** 点之间的解不超过一个 *************************************************************/#include <stdio.h>#include <math.h>main(){void bisec(float init_left_val, float init_right_val);float f(float value):float xleft, xright;char line[100];(void)printf("Please enter an initial left and right value:");(void)fgets(line, sizeof(line), stdin);(void)sscanf(line, "%f %f", &xleft, &xright );(void)bisec(xleft, xright);return(0);}3 数据抽象Fortran 90有一个非常使用的，使用简单的数据抽象能力。

Intel Fortran 2013与Fortran标准的关系可以从以下几个方面理解：
1. 编程语言标准：Fortran是一种编程语言，拥有多个版本和标准。

Fortran 77是早期的标准，随后经历了Fortran 90、Fortran 95等后续版本。

Fortran 2013是Fortran语言的一个更新版本，它引入了一些新的特性和改进。

2. 编译器支持：Intel Fortran 2013是Intel提供的一款Fortran编译器，它支持Fortran 2013标准以及其他早期版本的Fortran标准。

这意味着使用Intel Fortran 2013编译器编写的Fortran程序应该能够遵循Fortran 2013标准的语法和语义规则。

3. 兼容性和特性：虽然Intel Fortran 2013支持Fortran 2013标准，但在实际编程中，程序员可能需要考虑到编译器对某些特性的支持程度和实现细节。

某些Fortran 2013的特性可能在Intel Fortran 2013中不完全支持或实现方式略有不同。

总的来说，Intel Fortran 2013与Fortran标准的关系在于它是一款支持Fortran 2013标准的编译器，程序员可以使用它来编写遵循Fortran 2013标准的程序。

然而，在实际编程中，程序员需要参考具体的编译器文档和标准文档，以确保代码的正确性和兼容性。