第2篇. 计算的叙述
算法的每一个步骤，都必须给予确切的定义。对于算法当中所
考虑的每一种情况，每一个有待执行的动作，都必须严格地和
不含混地加以规定。…对于以描述算法作为目的而设计出来
的，采用了形式的定义的程序设计语言，或者说计算机语言，
它的每一个语句都必须有非常确切的意义。
---- D.E.Knuth[1]《The Art of Computer Programming》
本质上FORTRAN就是一门语言，一门人与计算机赖以进行有效交流的语言，在这个意义上和我们使用的中文，英文等没有本质差别。现在假设要来描述一种大家都陌生的语言，那么总是要分成两个方面来描述，即一方面要描述这门语言的表象和形态，也就是它使用哪些符号，哪些词汇，一般的句式如何，怎样才能完整叙述一个任务之类；另一方面需要说明这门语言的语义，也就是说这门语言是如何用来表达我们需要它表达的意思的。
第4章基本上就是描述FORTRAN作为一种语言的基本形态，也就是书写这种语言的书写规则。
接下来几章则逐步说明如何用FORTRAN来表达我们的要求，或者反过来说，FORTRAN提供了些什么表达方式，以便我们用来向计算机提出合理的任务：
● 表达基本数据；
● 表达数据的结构；
● 完整地描述数据；
● 构造表达式；
● 驱动计算的赋值；
● 计算过程的结构控制；
在整个第二篇，我们将领略到FORTRAN 95是如何能够做到精致地描述计算的，而把一个问题阐述清楚了，就意味着问题已经解决了一大半。
[1]Donald E. Knuth (高纳德),Stanford University的The Art of Computer Programming荣休教授，而The Art of Computer Programming（计算机程序设计技巧）正是他的伟大著作的名称。洋洋七大卷的《The Art of Computer Programming》是当今全世界每一个计算机科学家所膜拜的圣经。1974年在该书刚完成前面很少一部分时，就给他带来了计算机科学家们梦寐以求的图灵奖。
第4章FORTRAN 95语言的形貌
要说明一门语言的形态，必须回答以下问题：
●它使用哪些符号来表达信息？
●它的词汇如何构成？
●它的语句如何构成？
●如何表达一个完整的任务？
具体的对于一门计算机语言，把这几个问题更加明确地转换过来，就是：
●它使用键盘上的哪些符号，各个符号有哪些用途？
●它的词汇如何由键盘字符构成？含有哪些固定的词汇？以及容许自由构成合法词汇
的规则是什么？
●它具有哪些固定的语句格式？以及容许自由构成合法语句的规则是什么？
●我们交待给计算机的任何任务，都必须明确说明任务的开始，执行步骤和完成，因
此一段完整的源代码应该具备什么样的形式？以及应该具备哪些要素？
本章就是要回答这些问题。
4.1 FORTRAN语言所使用的字符
从最抽象的层面来看，人与计算机的交流只是信息的交流，而信息总是需要依靠某种信号来表示，对于人来说，最方便的就是字符。而对于计算机来说，自然就是键盘所能敲出的那些字符(信号)，因此下面就是要说明：
●FORTRAN 95能识别键盘上敲出的哪些字符？
●每个字符对于FORTRAN 95来说又意味着什么？
4.1.1 FORTRAN 95所使用的基本字符
按照FORTRAN 95标准的规定，一切FORTRAN 95的实现平台都必须使用下面表4-1所列出来的这个基本的字符集，或者说，这个字符集是所有遵循FORTRAN 95标准的编译
器所使用的字符集的公共子集。这样原则上，局限在这个字符集上的源码是能够被任何遵循FORTRAN 95标准的编译器所识别的。
表4-1基本的FORTRAN 95字符集：
文字字符
英文字母 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
数字0 1 2 3 4 5 6 7 8 9
可以看到基本字符分为两大类：文字字符和特殊字符。除了货币符号可以本地化之外，其他任何字符都必须依照表里的形式。
对于基本字符有如下几个问题需要予以注意。
一.文字字符的用处：
●主要是命名的作用，可以用来命名语言中的一切对象，这三种符号可以混合使用；
●其中数字还具有它本来的含义，就是表示数目。
二.特殊字符的用处：
特殊字符主要具有功能的意义，如编辑功能，运算功能，语法功能等。
FORTRAN 95标准原则上接受小写字母。因此除了以下位置，大小写是等价的。
三.大小写必须区分的位置：
●作为字符常量的字符串里面；
●输入输出的纪录里面；
●作为编辑描述符的引号或撇号里面。
因为在上述几种情形，大小写是字符型数据的不同数据取值。
如果不幸遇到一个FORTRAN 95标准的怪异的编译平台，偏偏不接受小写字母，这是FORTRAN 95标准所许可的，这时就得小心了。不过幸好我们常用的编译平台，例如CVF，都是接受小写字母的。
另外，在OPEN或者INQUIRE语句里面的FILE=或NAME=后面是否区分大小写，也是由编译平台指定的。
如果是需要调用其他语言写的子程序，而恰好该种语言(例如C语言)是区分大小写的，这时就需要特别小心。
【例4-1】如果用C写了两个子程序EIGEN和eigen，然后有如下的FROTRAN片断：
EXTERNAL EIGEN
...
CALL EIGEN
...
END
这时它是该引用EIGEN还是eigen呢？如果所使用的FROTRAN系统正好是怪异的那种，没问题。如果是常见的如CVF，这时它就无法区分EIGEN和eigen，这样就必须给它们更换名称了。
四.数字的涵义：
除了以下情形，数字总是表示十进位数字
●属于二进制，八进制，十六进制的字面常量；
●带有B,O,Z编辑描述符的输入输出纪录。
【例4-2】以下语句当中的数字不是属于十进位数字：
DATA I, J, K / O?1001?, 23.54, Z?5CA2? /
其中第一个为八进制数，第二个为十进制数，第三个为十六进制数。
五.下划线的涵义：
●下划线的主要作用就是置于单词之间代替空格，使得我们在命名时使用清楚的英语
词汇。
●下划线不能置于任意名称的前面，但是可以置于名称的最后。
●下划线也用于在字面常量中区隔常量的值和种别参数。
无论给什么对象起名，都尽量使用完整的英语单词，同时使用下划线以区隔不同的单词。所谓好记性不如烂笔头，只有这样才能切实保证你在任何时候，在程序代码的任意位置都知道任意变量等的含义。
4.1.2 与平台有关的FORTRAN辅助字符集
上节列出的基本字符集是在一切FROTRAN的编译平台都可以使用的，被FORTRAN 95标准规定为必须使用的默认字符集。另外还有些辅助的字符则是不同的平台有不同的用法约定。
辅助字符分两类：可打印字符和不可打印字符。
●可打印字符；
各种本地化语言的字符，象汉字，希腊字母等，都可以应用在字符串，注释，和输入输出纪录当中。
●不可打印字符。
主要就是控制字符，例如制表符Tab键。
制表符(Tab键)在FORTRAN77标准当中主要用来表示6个空格，这样在固定源程序形式的代码的每行的开头使用Tab，就自动地空出6个空格。
对于一个FORTRAN77标准的编译系统来说，在固定源程序形式里的Tab被看成是至少6个空格，而在自由源程序形式里的Tab被看成1个空格。这样如果Tab被放在文本当中用于输出格式控制，那么这种默认的转换方式，有时就会导致输出格式的混乱。
有关FORTRAN 95的辅助字符集的使用规则，请参考具体的编译系统的说明。
4.2 词汇
所谓FORTRAN的词汇就是一个语句的最小的意义单位，它由一个或多个FORTRAN 字符集里的字符组成。包括两类共6种，分类例举如下：
●由文字字符组成的词汇，包括4种：
·语句关键词：IMPLICIT
·名称：EIGEN_FREQUENCY_3
·由单个词汇组成的字面常量：1.234567_long
·标识符：213
●由特殊字符组成的—
·算符: +，.OR.
·定界符：逗号，=，=〉，：，：：，；，%。
FORTRAN 95的一切合法的词汇都必须按照语法来构成。完备的构词语法规则在附录B 给出。
下面分别予以详细说明。
1. 语句关键词
语句关键词的功用：
●标志语句本身。
【例4-3】下面的DO语句中的关键词DO本身标志了该语句
DO I=1,500
●标志选项。
【例4-4】下面的INTENT语句当中的IN,OUT,或INOUT。
INTENT(IN)，A。B
INTENT(INOUT)，X，Y，Z
●用在语句当中，起分界的作用。
【例4-5】如下面DO语句当中的WHILE
DO WHILE( .NOT. VECTOR )
并非所有的语句都必须包含关键词，在FORTRAN里面，赋值语句和函数都不需要关键词。
尽管FORTRAN 95不区分大小写，本书任何地方出现的语句关键词都使用大写字母。纯粹是为了醒目的原因。
2.名称
在一个程序当中，任何对象都需要有一个名称，给它们命名所得到的词汇，可以说就是一般语言里的名词，这样的对象包括：变量，命名常量，程序单元，过程，公用块，构造，派生类型，哑元等。
名称的拼写规则为：
● 名称必须由字母开头，可以由文字字符混合组成，而下划线不能作为名称的第一个字符。
● 一个名称至多允许含有31个字符。
3. 常量
一个常量就是对一个值的合乎语法的字符标记。
常量分为字面常量和命名常量两种：
●一个值如果没有在程序里面经过命名，则称为字面常量，这种常量不能取派生数据
类型。
【例4-6】
66953
Z?5120A?
2.3417
.TRUE.
(33.2, 5.0)
● 一个值如果在程序里面经过命名，则称为命名常量，这种常量能取派生数据类型。
【例4-7】在如下声明语句当中的常量UNSTABLE_POINT为命名常量：
REAL, DIMENSION(3), PARAMETER ::UNSTABLE_POINT =&
(/5.332, 0.221, 190.632/)
对于常量的语义，将在说明数据时进一步讨论。
4. 语句标签
在一个程序单元内部，对任何一条语句，都可以在该语句的前面加上语句标签，以便在该程序单元内部的任何其他位置引用该语句。需要引用其他语句的语句包括CALL语句，DO结构，分支语句，输入输出语句等。
语句标签的书写规则为：
● 语句标签由1到5个十进制数字组成，其中必须至少有一个数字不能是0，例如000不能作为标识符；
● 标识符以0开头是没有任何意义的，例如0034与34没有区别。
● 标识符不能放置于空语句之前。
【例4-8】
456
上面的语句只出现了一个语句标签，是不合法的。
●对于在一个程序单元内部，标识符不唯一出现的情形，具有特殊的含义，将在后面
讨论。
5. 算符
算符用在表达式当中，通过运算而获得某种类型的值。
算符分为固有算符和自定义算符两类：
●固有算符
在FORTRAN 95语法当中，R310规定了固有算符的构成法则。
【例4-9】
//表示字符串的连接
+ 表示对数值的加法
.NOT. 表示逻辑否
.OR. 表示逻辑或
上面都是固有算符。
●自定义算符
自定义算符的一般语法形式为：
.XXX… .
即在两个句点之间有n个字符构成的字符串，n不大于31。
中间的字母串最好是一个表达该运算含义的英文单词。这个单词不能与固有算符或者逻辑常量里面已经使用了的单词重复。
6. 定界符
全部的定界符有如下12种形式：
/ ( ) (/ /) , = => : :: ; %
其中(和)，(/和/)都必须成对出现
顾名思义，这些定界符的功能就是在一个连续的源码文本当中，用来把不同性质的源码成分区分开。它们的具体含义将在具体的语句当中说明。
4.3 语句
一条语句由一些词汇组成，可以理解为表示要求计算机进行的一个动作，但一个说明，一个描述之类的，表面看好象不是计算机的一个动作，不过实质上同样要求机器内部的一个动作与之相对应，因此同样也构成FORTRAN的一条语句。
FORTRAN 95的语句分为两大类：
●非执行语句
当需要引入或说明一个程序单元或子程序，或者是说明数据类型时，就需要使用非执行语句。
●可执行语句
当需要计算机进行一个指定动作时，就需要使用可执行语句。
FORTRAN 95全部的语句的具体分类，以及语法和例示参见附录A，语句的语法也参见附录B。在后面的有关章节则分别说明了所涉及到的主要的语句。
4.4 源码形式
一个FORTRAN 95程序就是由以下三种形式的程序成分所构成的分行的文本：
●FORTRAN语句
●注释
●INCLUDE行
在一个FORTRAN 95程序里面，一条语句占一行或多行，一行也可以有多条语句，程序文本当中可以包含空行，但不具有任何含义，被FORTRAN编译器忽略。
这种形态的文本就是FORTRAN的源代码(源程序)。
从FORTRAN90开始，对于源程序的书写格式要求已经完全现代化了，也就是出现了所谓自由源程序格式，而此前，FORTRAN的固定源程序格式一直是初学者视为畏途的主要因素，那种传统的固定源程序格式完全是FORTRAN作为始祖级的高级语言的遗留痕迹，因为早期的源程序输入不是通过键盘，而是运用穿孔纸带，正是穿孔纸带的格式规定了相应的源程序的书写格式。现在之所以我们还需要了解这点，是因为FORTRAN的悠久历史，决定了有大量的源代码正是使用了那种古老格式，那是一个今天我们不得不继承的宝库，要想使用它们，显然就得会读那种格式，因此我们只需要了解固定格式，却不需要遵循固定格式来写代码。
【例4-10】
在这个例子里面，表明了行与语句之间可以有多种排列形式：
这里的例子显示了所谓自由源程序格式的自由之所在。这里使用了&作为一个语句在行与行之间连续的标志，而！后面的字符永远是注释。
23 FORMAT( 6Y, J9)!这是一条语句占有完整的一行的例子
37 FUNCTION string_concat(s1, & !这里一条语句被分到两行s2)
空格是被忽略的。
64 FORMAT( 6Y, J0)；37 FUNCTION & ！这里一行里有两条语句，其中一条
string_concat(s1, s2)！语句还只是它的一部分。
TYPE (string) :: s1, s2, string_concat
string_concat%string_data = s1%string_data(1:s1%length) // &
s2%string_data(1:s2%length)；string_concat%length & !这行里包含两条
= s1%length + s2%length！部分语句。
END FUNCTION string_concat
源码文本的一般规则如下：
● 在一个程序单元内部，行与行之间的顺序是有意义的，只有两个例外：
?注释行的顺序与位置可以非常自由；
?在CONTAINS语句和END语句之间的子程序的顺序也可以是任意的。
● 在一个程序单元内部，或者完全使用自由格式，或者完全使用固定格式。但是
一个程序内部的不同程序单元则可以使用不同的格式。后面要说明为了便于协调起见，如何使用一种自由格式与固定格式兼容的特定格式。
● 所谓字符文本是指如下两种情形下的字符串：
? 作为一个字符字面常量的取值的字符或字符串；
? 被字符串编辑描述符控制的字符或字符串。
那么描述符本身和续行符&永远都不属于其邻近的字符文本。
● 针对字符文本的规则与针对非字符文本的规则是不一样的。
【例4-11】下面例子说明了空格在字符文本与非字符文本当中的不同使用规则：
22 CHAR = NAME01 // “KNOWLEDGE ARCHIVE”
23 CHAR = NAME02 // “KNOWLEDGEARCHIVE”
在双引号里的字符串之间的空格是有意义的，因此上面的两个字符串是不同的。
DO43I=1,N
DO 43 I = 1,N
而上面这两条语句是等价的。
4.4.1 自由源程序格式
自由源程序格式的主要思想就是不限制语句在行内的位置。与固定格式相比，主要是空格的用法有差异。
自由源程序格式的一般规则如下：
●对于FORTRAN的基本字符集而言，一行至多能容纳132个字符，如果出现非基本
字符集当中的字符，则具体的平台会有相应的规定，这时，可能能够容纳的字符数目就会少于132。
【例4-12】假如下面的语句刚好包含132个字符，但是其中含有中文字符：
TEXT = CHINESE_SENTENCE?this line has exactly 132 characters and contains人?
这时，一个具体的实现平台会有相应的规定，一般来说它会认为上面语句的字符太
多了，因此为保险起见，尽量使用续行符。
●只要字符！不是作为字符文本当中的一个字符，那么在该行内它后面的所有字符都
是属于注释的内容。而FORTRAN对于注释内容没有任何限制，可以是任意形式，因为反正任何编译器对于注释部分都是忽略掉的。一行内可以在语句后面接注释内容，也可以整行就以！开头，这时该行就是完全的注释行。
总之，注释的位置可以是任意的，关键是一行的任意位置只要出现了注释符！，那么它后面直到行末，都会被编译器认为是注释内容而不加理会。因此不要把语句放置在一行内的注释后面。
●只要字符&不是作为字符文本当中的一个字符，那么在该行内它后面只能接空格以
及注释，在紧接着的行内只要存在非注释部分，那就是和该&前面的部分是连续的，被称为连续行。
在FORTRAN里，一个语句所跟随的连续行不能超过39行。
一行的非注释部分不能只是一个续行符&。
注释不能利用该字符来表示续行，因此如果注释部分的行末为字符&,则它只是属
于注释内容的一个字符，不具有续行的意思。
●一行如果只包含空格字符，或者根本不包含任何字符(这两者表现一样)，那么编译
器总是把该行视为注释行，予以忽略。
●一行之内可以不止包含一条语句，语句之间必须用(；)加以分隔。
●任何辅助字符集当中的字符都可以在字符字面常量和字符串编辑符当中使用。
●标签被放置于语句之前，任何情形下都必须避免标签被认为是属于一条语句内部的
字符。
按照FORTRAN语法，空语句是合法语句，只要空语句不是出现在一行的开头，因此连续的；；，甚至中间包含空格；；，都会被认为是单个的；，因为字符；总是意味着它的前面是一条语句，即使为空语句，也不算语法错误。
【例4-13】下面的语句都是合法的。
X=(3.0,4.6);Y=(44.5,566.0)
这里的；是作为语句分隔符
X=(3.0,4.6);
这里的；被忽略而不认为是错误
X=(3.0,4.6); ；；；；Y=(44.5,566.0)
这里的；；；；；等价于一个；，因为分号之间的空格被认为是空语句，不算语法错误。
X=(3.0,4.6)&
;Y=(44.5, 566.0)
这里分号放在一行的开头，因为该行是连续行。
Y=(44.5,&
566.0);Z=”ZERO”
【例4-14】下面的写法是错误的。
53 INTEGER X,Y !这里53是合法的标签
IF (X==0)76 Y=X ！这里的标签76不能说明自己不属于IF语句
下面我们更加详细地说明在自由源码形式里面续行符和空格的用法。
1. 续行符
只是采用续行符的不同用法，就有可能产生完全不等价的语句，因为续行符能够导致名称的变化。所以如果一个名称，字符常量，或词汇被迫分行，则必须在前一行的末尾和后一行的开头紧接着字符使用&。
【例4-15】
ENERGY = 0.5*MASS * VILOC& !这里VILOCITY是一个变量名
&ITY**2
ENERGY = 0.5*MASS * VILOC & !这里变量名成了VILOC ITY！
&ITY**2
ENERGY = 0.5*MASS * VILOC & & !这里变量名成了VILOC & ITY！
&ITY**2
上面的三个语句是完全不等价的！
2. 空格的使用规则
在具有固定名称以及固定格式的算符当中，不能随意使用空格。因为空格默认的功能就是分隔不同的词汇。
【例4-16】
CALL SUBROUTINE A
CALL SUBRO UTINE A！错误语句！
IF X = .NOT .
IF X = .NOT. ！这两条语句不同
【例4-17】下面语句当中的空格是不可少的：
INTEGER X,Y
IF A=0
DO Y=1,20
但不是所有情形下的词汇之间必须要有空格，在不会产生混乱的前提下，有些语句关键词之间的空格是可以省略的，对于语句关键词来说，所有这些不同的情形列举如下表4-1：
4.4.2 固定源程序格式
今天已经没有必要按照固定格式书写源程序，只需要能够阅读古老的使用固定格式的代码，如果有必要把固定格式的源程序转换为自由格式，也可以运用某些小软件完成，因此下面只是简要地介绍固定格式的几个规则。
●语句只能书写在一行的第7到第72个格子上。
●空格除了在字符常量里以外，都是没有意义的。
●在某行第一格为字符C,或*,就表示该行整行都是注释。注释总是被忽略。
●字符!只要不是出现在第6格，也不是属于字符文本，则从它开始一直到该行的行末，
都属于注释。
●一行如果只包含空格字符，或者根本不包含任何字符(这两者表现一样)，那么编译
器总是把该行视为注释行，予以忽略。
●一行中的多条语句用一个或多个分号分隔；分号可以出现在行末，但没有更多的意
义；分号不能是一行的第7到第72个格子上第一个非空格字符。
●除了空格和0之外的任意字符，只要出现在某行第6格上，则表示该行为连续行。
一行后面最多只能有19个连续行，第一行称为初始行。
●标识符只能出现在第1到第5格上，被连续的语句只有第一行可以使用标识符，这
样下面所有的连续行的第1到第5格上只能是空格。
●END语句不能被连续，它也不能被视为初始行。
4.4.3 兼容源程序格式
在某些情形下，需要书写能够同时被自由格式和固定格式兼容的源码，要做到这点，只需要遵循以下规则即可：
●标识符只能出现在第1到第5格上，语句只能书写在一行的第7到第72个格子上。
●按照自由格式的规则使用空格。
●使用！作注释符，但不要放置在第6格，也不要是用使用字符C,或*作注释符。
●需要连续行时，在被连续行的第73格写&,同时在连续行的第6格也写&,第74格到
80格保持空格或者只写注释。而连续行的第1到第5格上只能是空格。
下面就是一个同时满足两种源码形式要求的代码例程：
【例4-18】
Column:
12345678 (73)
_________________________________________________________________________
! Define the function CUT_SIN
DOUBLE PRECISION FUNCTION CUT_SIN(X)
CUT_SIN = X - X**3/FACTOR(3) + X**5/FACTOR(5)&
&- X**7/FACTOR(7)
CONTAINS
INTEGER FUNCTION FACTOR(N)
FACTOR = 1
DO 10 I = N, 1, -1
10 FACTOR = FACTOR * I
END FUNCTION FACTOR
END FUNCTION CUT_SIN
4.4.4 程序结构
在FORTRAN 95的语法规则里面规定了程序结构的完整定义，参见附录B。
不过那里的语法规则并没有完备地表述在一个程序单元里，各种语句应该遵循什么顺序。下面给出一般原则：
●数据类型声明和指定的语句必须放置在可执行结构或语句之前；
●FORMAT,DATA,ENTRY语句也可以放置在可执行语句中间，不过把DATA语句放
置在可执行语句中间是一种过时的做法；
●如果出现USE语句，必须总是放在最前面；
●如果出现内部子程序或模块子程序，则必须跟在CONTAINS语句后面。
【例4-19】下面是一个典型的只包含一个程序单元，也就是主程序的FORTRAN程序：!本程序能够求出所有100-999之间每一位上的数字的立方和等于自身的三位数。
PROGRAM SUM_OF_CUBES
INTEGER A,B,C
DO A = 1,9
DO B = 0,9
DO C = 0,9
IF (100*A + 10*B + C == A**3 + B**3 + C**3) &
PRINT “(3I1)”, A,B,C
END DO
END DO
END DO
END PROGRAM SUM_OF_CUBES
RUN SUM_OF_CUBES
153
370
371
407
大家不妨尝试一下，1000-9999之间还存在这样的数字吗？如果是平方呢？
下面的表4-2给出了程序单元的基本模式，其中处于同一水平位置的各语句之间没有严格的前后顺序，而不同的行则表示了严格的在程序当中出现的前后顺序：
表4-2程序单元的基本模式
程序，函数，子例行程序，模块，数据块语句
CONTAINS语句
内部子程序或模块子程序
END语句
●把DATA语句放置在可执行结构中间已经过时。
●语句函数语句已经过时。
表4-3给出一个特定的语句能够在什么结构中出现，不能在什么结构中出现的概貌：
其中Y表示该语句可以在相应的结构当中出现，N表示不能出现。
4.5 INCLUDE行
很多时候一个完整程序的源码还可以原封不动地移植到另一个程序源码的中间，这时并不需要把被移植源码完整地抄写过来，而只需要简单地运用INCLUDE行即可。
【例4-20】
PROGRAM GREEN_FUNCTION
REAL X,Y,Z
….!语句省略
INCLUDE …GAUSE?
….! 语句省略
END
这样源码文件GAUSE就直接进入程序GREEN_FUNCTION的源码里面，取代了INCLUDE行的位置。
INCLUDE行由关键词INCLUDE和其后的文件名称组成。其中的文件名称是一个字符文本常量。
●INCLUDE行只是针对编译器的一个提示，而不是属于程序内的FORTRAN语句。
●其中的字符文本常量不能带作为命名常量的种别参数。
●INCLUDE行必须放置在程序当中，其所引用文件应当出现的位置。
●INCLUDE行所在行不能有任何其他文字，包括标识符，当然可以有注释。
●INCLUDE行可以进行嵌套，嵌套的层数由具体的编译器规定。注意在嵌套的同时
不能导致定义循环。
●INCLUDE行之前的语句不能是被连续行，其后的语句也不能是连续行。
4.6 与其他语言的语法要素方面的比较
下面简要地比较一下，作为一种语言，FORTRAN和其它语言在总的语法风格方面的异同。
一种计算机语言的语法远比任何自然语言的语法要来得简单明了，计算机语言的语法风格可以明确地归结为各种基本语法要素的选择。因此可以按照语法要素对不同的语言加以比较。
1.字符集
按照语言的所谓形式定义，语言就是取自一个有限字符集合的任意字符所构成的有限字符串的集合。
显然，一种语言选择哪些字符作为它的字符集，正是语言文法设计的第一步。
最常用的字符集就是ASCII字符集，而一套完整的字符集除基本字母和数字外，通常还包含一些特殊字符，以便为语言提供足够的表达手段。
表面看来，一种语言所使用的字符越多，它的表达能力应该是越大，然而在增大字符集的同时，也增加了编译时词法分析的分量，因此这里的折衷方式的不同，造就了不同语言的字符集的差异。
字符集的选择首先来自语言的输入输出设备。对于FORTRAN，C等大多数语言，是面向以工业标准键盘为主的输入输出设备的，因此这些语言的字符集可以说是大同小异的，不过也有例外，如APL语言就使用了ASCII字符集之外非常特殊的字符，因此这种语言的字符集就不能被大多数输入输出设备直接使用。
从计算机历史来讲，到了1960年代的早期，计算机行业对字符的表示大都由六位字节转变为八位字节，这样理论上就有了256个字符可用，分配给52个大小写字母、十个数字以及一些标点符号，应该是足够了。不过，由于计算机语言本地化的趋势越来越流行，语言的国际化导致各种民族语言的文字都要求进入字符集。除了法语，德语里的语音符号之外，希腊语，阿拉伯语之类的语言有着完全不同的字符集。而如果中文和日文要进入计算机语言，则需要一个有一万多符号的字符集。因此甚至出现了一种想法，就是考虑用十六位(65536)来表示字符集。
2. 语句标签
在FORTRAN77及其前面的标准里，语句标签的使用具有严重的时代烙印，而随着技术的进步，这种过时的玩意在大多数情况下不再具有任何价值，特别是严重地损害源码的可读性。因此语句标签在任何语言里都是属于需要淘汰的对象。
3.运算算符
字符+和-(加号和减号)在大多数语言里都是代表两种基本的数学运算，不过除了这两个符号之外，其他的运算算符就有相当多的花样了。
例如只是用特殊字符来表示基本运算算符，典型的就是APL语言，还有LISP语言、TIMES语言等的逻辑运算符；而大多数语言使用一些字符组合，同时也利用特殊字符来表示部分运算算符，有时还使用一些不属于上述两种之中任意一种的字符串来表示部分运算算符，例如FORTRAN里面的.EQ.表示相等，指数运算用**表示等。
4. 关键词
计算机语言大都使用保留字与关键词，从而能够提高翻译器的检错能力。而且大多数以关键词开始的语句本身就表明了语句的类型。例如IF、READ等。
一种语言究竟使用多少保留字和关键词，往往是一个折衷的结果：保留字少，可以减少编程者的记忆负担，同时却会增加语法分析的困难；而如果使用大量的保留字，例如COBOL 语言，使用了大量的保留字，使得编程者很难全部记下，因此就会常常出现不小心使用保留字作变量名的错误，当然使用很多的保留字，就会使得翻译过程中的语法分析变得更为简单。特别需要注意的是，当一种语言出现新版本时，得小心是否引入了新的保留字，例如COBOL
语言，就在新标准里引入了新的保留字，这就意味着那些在程序中使用新的保留字作为变量名(或其他名字)的旧程序，按照新标准在语法上就不再正确了，尽管这个程序一点也没有改过。对于FORTRAN来说，这类问题就没那么严重。
5.注释
尽管注释一定是被编译器忽略的，但却是文件中十分重要的一部分，因为注释是保证源码的可读性非常重要的手段。在不同的语言里，表示注释的方式非常不同，甚至在一种语言里，也可能有几种方法引入注释：
在C语言程序中，需要使用／*和*／这样的特殊标记来界定而不管行边界，这时常常出现的错误就是漏掉结束的界定符，使得后面的语句也变成了注解！
FORTRAN 95语言中的! ，Ada语言中的-，或是C十十语言中的//，都是在行的任意位置开始而直到行的末尾结束。这种做法就更为合理方便。
6.空格
在不同的语言里空格的使用规则非常不同。这点需要引起注意。在FORTRAN语言中，空格在除了字符串数据以外的任何其他地方都没有意义。而在很多语言当中使用空格来作为分界符，这就使得空格在语法中有实际的含义。对于初学者来说，常常意识不到空格带来的问题。
7.定界符和括号
定界符的作用就是简单地标志类似语句或表达式之类的语法元素，目的就是增加源码的可读性，并且使得语法分析更加简单。特别需要注意的是，成对的定界符用来清楚地界定特定语法结构的边界，从而可以有效地消除二义性。
8.自由或固定格式
严格的固定字段格式一般是应用在汇编语言当中。而早期的FORTRAN则是使用了部分固定字段格式；其实很多语言早期同样是具有部分固定字段格式，不过现代语言的风格是完全排斥那种固定格式的，因此几乎所有语言，只要还没有被废弃，都已经采用了自由字段格式。
第5章准备数据 从本章开始，我们将赋予语言实质性的语义，也就是规定上章所描述的语言的每一个细节所具有的涵义。这种涵义与其说是我们对于一种语言细节的定义，不如说是算法的要求，要求语言具有足够多的细节，用来表达在算法当中有可能出现的精细情节。 对于任何的问题，站在计算机的角度来看，总是可以把它抽象为如下图所示的结构： 因此要准备通过计算来解决一个问题，首先要作到的是把该问题所涉及到的数据整理好，也就是列出所有的数据，然后根据数据的数学属性进行分类，这个分类的过程就是对数据施加足够的标记的过程，将来把这些数据输入到计算机，计算机将能够依据这些标记，辨识出数据所应该具有的数学属性，从而施加相应的合法数学运算。 所以作为向计算机描述计算问题的FORTRAN语言，它首先要作到的是约定如何给数据施加足够详细的标记。 对这个标记过程的第一个要求是保证准确性，也就是说这个语言的标记系统必须正确地反映真实世界的问题里面，数据所具有的数学属性，因此这个标记系统必然是与数据的数学分类结构保持一致的。 从数学的观点来看，世界上的所有数据，总是可以被表示为整数，实数，复数等等基本的数据种类，因此本章的内容就是讨论： ●FORTRAN语言如何把数据归结为一些基本数据类型； ●然后为了足够详尽地描述每一个数据类型的属性，FORTRAN是如何施加相应的标 记的； ●FORTRAN语言对于这些标记(语法形式)所约定的语义是什么。 然后我们就可以知道，要想用FORTRAN来描述一个问题的算法，并进而以问题算法的FORTRAN语言版本为媒介，通过计算机来得到计算结果，第一个步骤，就是准备好数据的FORTRAN描述。 5.1 数据是什么 在上一章里，据称计算机能够使用语言，而且是非常类似于人类的语言，至少从形式上看很象，这难免会令某些人(特别是看过KUBRICK的影片《2001: A Space Odyssey》的观众们)感到恐惧：) 别怕！且先不讨论FORTRAN作为语言是否具有与人类语言等价的表达能力，至少从自然语言的语义学的角度来看，FORTRAN说出来的话其实是绝对空洞的，因为FORTRAN 语言的全部语义基础就只是数据，而数据对机器而言，只是意味着经过编码的符号。 一台计算机其实是由以下6个部分组成：
《程序设计语言(FORTRAN）》课程教学大纲 课程编号： 总学时数：64(计划内)+16(计划外) 总学分数：4 课程性质：必修课 适用专业：给水排水工程、环境工程、土木工程、工程力学、无机非金属材料工程、应用化学等工科专业。 一、课程的任务和基本要求： FORTRAN语言广泛应用于数值分析、科学计算和工程设计等领域，FORTRAN90/95是FORTRAN语言的最新版本，它是一个功能十分强大且体现现代程序设计语言特征的新型程 序设计语言，在社会上产生了广泛影响，许多高等学校、科研院所和公司企业开始引入和使用FORTRAN90/95语言。《程序设计语言(FORTRAN)》课是计算机基础教学课程体系中一门重要的计算机技术基础课程，是给水排水工程、环境工程、土木工程、工程力学、无机非金属材料工程、应用化学等工科专业（方向）的一门学科基础课和专业必修课。 1、课程任务 通过《程序设计语言(FORTRAN)》课程的学习，使学生了解和掌握计算机程序设计的基本概念、基本知识和基本方法，了解和掌握计算机求解问题的机制和方法，熟练掌握FORTRAN90/95语言基本内容、编程技能和开发环境，能熟练运用FORTRAN90/95语言设计 和编写比较复杂的FORTRAN90/95程序，有效解决本专业中遇到的一些数值计算和数据处理问题，使学生计算机应用能力得到显著提高，为专业应用和发展奠定基础。 2、基本要求 (1) 了解程序设计的基本概念、基本知识和基本方法。 (2) 掌握FORTRAN90/95基本内容，能设计和编写比较复杂的FORTRAN90/95程序。 (3) 掌握FORTRAN90/95开发环境（Developer Studio），提高开发效率。 (4) 能结合本专业实际，熟练使用FORTRAN90/95解决有关数值计算和数据处理问题。 二、基本内容和要求： 1．程序设计概述 (1)程序设计语言。 (2)程序和程序设计。 (3)算法的基本概念和主要特征。 (4)程序设计方法。 通过学习要求学生了解程序设计的基本知识、基本概念、基本方法。掌握计算机求解问题的机制和方法。 2．FORTRAN90/95软件开发环境 (1)FORTRAN语言发展概述和FORTRAN90/95主要特征。 (2)Digital Visual FORTRAN 5.0/Compag Visual FORTRAN 6.6主要特性和系统配置。 (3)Microsoft Developer Studio开发环境和解题过程。 通过学习要求学生了解FORTRAN语言发展历史和FORTRAN90/95主要特征，掌握Microsoft Developer Studio开发环境和解题过程。 3．FORTRAN90/95基础知识 掌握字符集、名称、关键字、程序单元、语句、书写格式、数据类型等基础知识和基本概念。 通过学习要求学生熟练掌握FORTRAN90/95常用语法知识和基本使用规则。
第2篇. 计算的叙述 算法的每一个步骤，都必须给予确切的定义。对于算法当中所 考虑的每一种情况，每一个有待执行的动作，都必须严格地和 不含混地加以规定。…对于以描述算法作为目的而设计出来 的，采用了形式的定义的程序设计语言，或者说计算机语言， 它的每一个语句都必须有非常确切的意义。 ---- D.E.Knuth[1]《The Art of Computer Programming》 本质上FORTRAN就是一门语言，一门人与计算机赖以进行有效交流的语言，在这个意义上和我们使用的中文，英文等没有本质差别。现在假设要来描述一种大家都陌生的语言，那么总是要分成两个方面来描述，即一方面要描述这门语言的表象和形态，也就是它使用哪些符号，哪些词汇，一般的句式如何，怎样才能完整叙述一个任务之类；另一方面需要说明这门语言的语义，也就是说这门语言是如何用来表达我们需要它表达的意思的。 第4章基本上就是描述FORTRAN作为一种语言的基本形态，也就是书写这种语言的书写规则。 接下来几章则逐步说明如何用FORTRAN来表达我们的要求，或者反过来说，FORTRAN提供了些什么表达方式，以便我们用来向计算机提出合理的任务： ● 表达基本数据； ● 表达数据的结构； ● 完整地描述数据； ● 构造表达式； ● 驱动计算的赋值； ● 计算过程的结构控制； 在整个第二篇，我们将领略到FORTRAN 95是如何能够做到精致地描述计算的，而把一个问题阐述清楚了，就意味着问题已经解决了一大半。
[1]Donald E. Knuth (高纳德),Stanford University的The Art of Computer Programming荣休教授，而The Art of Computer Programming（计算机程序设计技巧）正是他的伟大著作的名称。洋洋七大卷的《The Art of Computer Programming》是当今全世界每一个计算机科学家所膜拜的圣经。1974年在该书刚完成前面很少一部分时，就给他带来了计算机科学家们梦寐以求的图灵奖。 第4章FORTRAN 95语言的形貌 要说明一门语言的形态，必须回答以下问题： ●它使用哪些符号来表达信息？ ●它的词汇如何构成？ ●它的语句如何构成？ ●如何表达一个完整的任务？ 具体的对于一门计算机语言，把这几个问题更加明确地转换过来，就是： ●它使用键盘上的哪些符号，各个符号有哪些用途？ ●它的词汇如何由键盘字符构成？含有哪些固定的词汇？以及容许自由构成合法词汇 的规则是什么？ ●它具有哪些固定的语句格式？以及容许自由构成合法语句的规则是什么？ ●我们交待给计算机的任何任务，都必须明确说明任务的开始，执行步骤和完成，因 此一段完整的源代码应该具备什么样的形式？以及应该具备哪些要素？ 本章就是要回答这些问题。 4.1 FORTRAN语言所使用的字符 从最抽象的层面来看，人与计算机的交流只是信息的交流，而信息总是需要依靠某种信号来表示，对于人来说，最方便的就是字符。而对于计算机来说，自然就是键盘所能敲出的那些字符(信号)，因此下面就是要说明： ●FORTRAN 95能识别键盘上敲出的哪些字符？ ●每个字符对于FORTRAN 95来说又意味着什么？ 4.1.1 FORTRAN 95所使用的基本字符 按照FORTRAN 95标准的规定，一切FORTRAN 95的实现平台都必须使用下面表4-1所列出来的这个基本的字符集，或者说，这个字符集是所有遵循FORTRAN 95标准的编译
Intel Visual Fortran 2013 sp1 完整版下载及安装教程(windows) 10月16日版：更新支持win8.1、VS2013下载地址 【完整安装包】https://www.doczj.com/doc/4f4076239.html,/akdlm/irc_nas/3651/w_fcompxe_ novsshell_2013_sp1.1.139.exe 【联网安装包】https://www.doczj.com/doc/4f4076239.html,/akdlm/irc_nas/3651/w_fcompxe_ novsshell_online_2013_sp1.1.139.exe 【百度云副本】https://www.doczj.com/doc/4f4076239.html,/s/18E41z 更新内容（翻译自官网，不妥之处恳请指正）： 1.Intel? Fortran Compiler 更新至14.0.1 --增加/assume:std_value 编译选项 --增加/Q[a]xMIC-AVX512 编译选项 --增加/Qopt-gather-scatter-unroll=n 编译选项 2.Intel? Math Kernel Library 更新至11.1 Update 1 3.增加对Microsoft Windows 8.1*的支持 4.增加对日语的支持 5.修正问题 --https://www.doczj.com/doc/4f4076239.html,/en-us/articles/intel-composer-xe-2013-compilers-sp1-fixes-list --https://www.doczj.com/doc/4f4076239.html,/en-us/articles/intel-mkl-111-bug-fixes/ 安装说明： 1、下载安装包中的任意一个，前两个为官方地址，第三个为百度云副本（完整安装包） 2、运行w_fcompxe_novsshell_2013_sp1.0.103.exe 3、点击extract，解压安装包，解压完毕程序会自动运行安装向导 4、在第三步（Activation）中选择Choose alternative activation，点击下一步 5、选择Use a license file 6、选择你的授权许可文件（lib文件） 7、继续安装过程 备注： 1、安装Intel Visual Fortran Composer前，请确保已经安装了Microsoft Visual Studio 2010/2012/2013。若使用其他编辑器，需要手动配置编译环境。 Visual Studio官网：https://www.doczj.com/doc/4f4076239.html,/。 微软旗下的DreamPark计划为在校大学生免费提供VS2013Pro版，地址：https://https://www.doczj.com/doc/4f4076239.html, 2、安装过程中没有加以说明的步骤，请直接点击下一步。
第一章: Fortran语言程序设计初步 Fortran语言的发展概况 本节介绍Fortran的起源与发展历史，讲述Fortran由产生到形成标准FortranIV、Fortran77，并进一步形成新标准Fortran90/95的发展历程。 1.1.1 Fortran的历史 a)a)FortranI FortranIV Fortran是目前国际上广泛流行的一种高级语言，适用于科学计算。Fortran 是英文FORmula TRANslatio n的缩写，意为“公式翻译”。它是为科学、工程问题中的那些能够用数学公式表达的问题而设计的语言，主要用于数值计算。这种语言简单易学，因为可以像抄写数学教科书里的公式一样书写数学公式，它比英文书写的自然语言更接近数学语言。Fortran语言是第一个真正推广的高级语言。至今它已有四十多年历史，但仍历久不衰，始终是数值计算领域所使用的主要语言。Fortran语言问世以来，根据需要几经发展，先后推出形成了很多版本。 第一代Fortran语言是在1954年提出来的，称为FortranI。它于1956年在IBM 704计算机上得以实现。在此之前编写计算机程序是极为繁琐的，程序员需要详细了解为之编写代码的计算机的指令、寄存器和中央处理器(CPU)等方面的知识。源程序本身是用数学符号(八进制码)编写的，后来采用了助记符，即所谓机器码或汇编码，这些编码由汇编程序转换为指令字。在50年代书写和调试一个程序要很长时间，因为用这种方式编写程序显然是很不方便的，尽管它能使CPU高效地工作。正是这些原因，促使由John Backus率领的IBM公司的一个小组研究开发最早的高级程序设计语言Fortran。其目的是开发一种容易理解、简单易学又能几乎像汇编一样高效运行的语言，他们取得了极大的成功。Fortran 语言作为第一种高级语言不仅是一次创新，也是一次革命。它使程序员摆脱了使用汇编语言的冗长乏味的负担，而且它使得不再只是计算机专家才能编写计算机程序，任何一名科学家或工程技术人员，只要稍加努力学习和使用Fortran，就能按自己的意图编写出用于科学计算的程序。 经过不断发展，FortranI形成了很多不同版本，其中最为流行的是1958年出现的FortranII，它对FortranI进行了很多扩充(如引进了子程序)，FortranII 在很多机器上得以实现。其后出现的FortranIII未在任何计算机上实现。1962年出现的FortranIV对原来的Fortran作了一些改变，使得FortranII源程序在FortranIV编译程序下不能全部直接使用，导致了语言不兼容的问题。这样就形成了当时同时使用FortranII和FortranIV两种程序设计语言的局面。
Fortran95程序设计习题答案 第四章 1.program main implicit none write(*,*) "Have a good time." write(*,*) "That's not bad." write(*,*) '"Mary" isn''t my name.' end program 2.program main real, parameter :: PI=3 implicit none.14159 real radius write(*,*) "请输入半径长" read(*,*) radius write(*,"(' 面积='f8. 3)") radius*radius*PI end program 3.program main implicit none real grades write(*,*) "请输入成绩" read(*,*) grades write(*,"(' 调整后成绩为 'f8.3)") SQRT(grades)*10.0 end program 4.integer a,b real ra,rb a=2 b=3 ra=2.0 rb=3.0 write(*,*) b/a ! 输出1, 因为使用整数计算, 小数部分会无条件舍去 write(*,*) rb/ra ! 输出 1.5 5.program main implicit none type distance real meter, inch, cm end type type(distance) :: d write(*,*) "请输入长度:" read(*,*) d%meter d%cm = d%meter*100 d%inch = d%cm/ 2.54 write(*,"(f8.3'米 ='f8.3'厘米 ='f8.3'英寸')") d%meter, d%cm, d%inch end program 第五 章 1.program main implicit none integer money real tax write(*,*) "请输入月收入" read(*,*) money if ( money<1000 ) then tax = 0.03 else if ( money<5000) then tax = 0.1 else tax = 0.15 end if write(*,"(' 税金为 'I8)") nint(money*tax) end program 2.program main implicit none integer day character(len=20) :: tv write(*,*) "请输入星期几" read(*,*) day select case(day) case(1,4) tv = "新闻" case(2,5) tv = "电视剧" case(3,6) tv = "卡通" case(7) tv = "电影" case default write(*,*) "错误的输入" stop end select write(*,*) tv end program 3.program main implicit none integer age, money real tax write(*,*) "请输入年龄"
I n t e l V i s u a l F o r t r a n安装+使用详细讲解 好久都没有用Fortran了，这两周由于帮老师做事，就写了两个插值程序。刚刚去论坛里面搜了一下关于IVF的帖子，发现不是很多，个人感觉某些不怎么详细，从我第一次接触IVF 已经有三年了，下面我就把我对于IVF的认识和理解跟大家分享咯，求各位同仁不喜勿喷... 简介:IntelVisualFortran(IVF)和CompaqVisualFortran(CVF)类似，都是用来编写Fortran 语言的一个编译器，IVF看名字就知道，它是由Intel公司开发，而CVF则是由HP公司开发，之前看到一个帖子说，HP公司的CVF开发团队加盟到了Intel公司，或者可以说Intel 公司收购了HP公司的这个团队，而从2006年开始就不再开发新的CVF系列版本了，这么多年以来CVF也确实没有、......之后的版本出现，转而出现的确实IVF2010，IVF2011,IVF2013的新版本的出现。这就说明IVF是以后的主流趋势，而CVF只能成为我们的回忆，值得一提的是，IVF肯定是在CVF的基础上发展起来的，因此我们用到IVF的时候，会有一种熟悉的感觉。 Q1：为什么要用IntelVisualFortran？ 我第一次接触到IVF是当时我的电脑(Win7)不能正常使用CVF版本，会出现各种意想不到的问题(反正我是遇到过得，搞得编程的心情都没有了)，论坛里面也有一些什么破解的方法，都不管用，于是就在“小木虫”论坛里面看到了IVF，到目前为止，我用IVF在Win7的32位和64位的电脑上没有出现任何不兼容的问题（CVF是不支持64位机子的）。我自己的理解是新版本的出现，先不从稳定不稳定来说，肯定是有它的优势所在，Fortran标准的版本也在逐步的修改，比如将面向对象这些加入进来，以前版本的编辑器或许就不能支持了。因此，用IVF编写Fortran程序是一种与时俱进的趋势。 Q2：如何获取IntelVisualFortran？ 在百度或者家园论坛里面搜一下就会有很多相关下载的帖子，我自己也搜集了一些，下面就把我目前用到的版本给大家分享 链接:提取密码:5p02 链接:c:\iknow\docshare\data\cur_work\_blank提取密码:ady4 第一个是IVF的安装包 第二个就是IVF的licence文件（在安装过程中需要用到） Q3：如何在电脑中安装IntelVisualFortran？ （建议电脑是XP系统的坛友，还是用CVF，电脑是Win7/8的坛友就可以安装IVF） IVF的安装比CVF的安装稍微麻烦一点的就是在安装过程这一步，在安装上面下载的IVF安装包之前，需要提前安装一个东西，那就是MicrosoftVisualStudio****(VS)这个集成开发环境(IDE)，可以简单的理解为，IVF就是VS里面的一个用于编写Fortran的插件，下面我也提供一个我的VS2010版本的下载。(市场上最新的是VS2013) VisualStudio2010简体中文专业版（MSDN原版下载内置KEY）.iso 链接:c:\iknow\docshare\data\cur_work\_blank提取密码:w7yv
Intel Visual Fortran安装+使用详细讲解 好久都没有用Fortran了，这两周由于帮老师做事，就写了两个插值程序。刚刚去论坛里面搜了一下关于IVF的帖子，发现不是很多，个人感觉某些不怎么详细，从我第一次接触IVF已经有三年了，下面我就把我对于IVF的认识和理解跟大家分享咯，求各位不喜勿喷... 简介:Intel Visual Fortran(IVF)和Compaq Visual Fortran(CVF)类似，都是用来编写Fortran语言的一个编译器，IVF看名字就知道，它是由Intel公司开发，而CVF则是由HP公司开发，之前看到一个帖子说，HP公司的CVF开发团队加盟到了Intel公司，或者可以说Intel公司收购了HP公司的这个团队，而CVF6.6从2006年开始就不再开发新的CVF系列版本了，这么多年以来CVF也确实没有6.7、6.8......之后的版本出现，转而出现的确实IVF2010，IVF2011,IVF2013的新版本的出现。这就说明IVF是以后的主流趋势，而CVF只能成为我们的回忆，值得一提的是，IVF肯定是在CVF的基础上发展起来的，因此我们用到IVF的时候，会有一种熟悉的感觉。 Q1：为什么要用Intel Visual Fortran？ 我第一次接触到IVF是当时我的电脑(Win7)不能正常使用CVF版本，会出现各种意想不到的问题(反正我是遇到过得，搞得编程的心情都没有了)，论坛里面也有一些什么破解的方法，都不管用，于是就在“小木虫”论坛里面看到了IVF，到目前为止，我用IVF在Win7的32位和64位的电脑上没有出现任何不兼容的问题（CVF是不支持64位机子的）。我自己的理解是新版本的出现，先不从稳定不稳定来说，肯定是有它的优势所在，Fortran标准的版本也在逐步的修改，比如将面向对象这些加入进来，以前版本的编辑器或许就不能支持了。因此，用IVF编写Fortran程序是一种与时俱进的趋势。 Q2：如何获取Intel Visual Fortran？ 在百度或者家园论坛里面搜一下就会有很多相关下载的帖子，我自己也搜集了一些，下面就把我目前用到的版本给大家分享 https://www.doczj.com/doc/4f4076239.html,poser.XE.2011.5.221.ISO-TBE.iso :pan.baidu./s/1pJiB7iN提取密码:5p02 Intel_Visual_Fortran_XE2011.lic:pan.baidu./s/1bnH5Uyz提取密码:ady4 第一个是IVF的安装包 第二个就是IVF的licence文件（在安装过程中需要用到） Q3：如何在电脑中安装Intel Visual Fortran？ （建议电脑是XP系统的坛友，还是用CVF，电脑是Win7/8的坛友就可以安装IVF）IVF的安装比CVF的安装稍微麻烦一点的就是在安装过程这一步，在安装上面下载的IVF 安装包之前，需要提前安装一个东西，那就是Microsoft Visual Studio ****(VS)这个集成开发环境(IDE)，可以简单的理解为，IVF就是VS里面的一个用于编写Fortran的插件，下面我也提供一个我的VS2010版本的下载。(市场上最新的是VS2013) Visual Studio 2010 简体中文专业版（MSDN原版下载置KEY）.iso :pan.baidu./s/1kTsnilh提取密码:w7yv 因此，安装IVF的步骤就是：首先在电脑上安装VS，然后再安装IVF。千万不要将顺序弄
第9章基本计算(一)赋值语句 从计算机的实际状态来看，给出表达式并不意味着计算的开始，真正能够驱动计算的是可执行语句，而最直接驱动表达式的计算过程的就是赋值语句，完成一个赋值步骤，就意味着机器的状态的局部或全局发生了一个根本的变化。 从语法的角度来看，一个表达式还只是一个比较复杂的复合词汇，还不能构成一个完整的语句，而赋值语句则是一个在语法意义上的完整的语句，表达式在赋值语句中扮演关键的语法作用。 从计算问题的角度来看，赋值可以说是基本的计算步骤，考虑一下我们人工计算的过程就可以发现，任何一个完整的计算步骤，都可以说就是一个赋值步骤，特别是公式演算和数值计算，完成一个局部运算过程的标志，往往就是求出某个中间变量的数值或表达式。 FORTRAN语言作为一种以公式翻译为初衷的高级语言，它的赋值语句的一般形式就是一个数学等式，当然不是那种公式恒等变换得到的恒等式，而是要把运算的结果赋予一个变量，因此它的一般句法形式为： variable = expression variable => expression 可以看到一个赋值语句作为一个完整的语句，分为三个部分： ● 被赋值的变量 ● 赋值符号 ● 计算(表达式) 其中被赋值的变量，通过赋值，就拥有了明确的取值形式，如果该变量含有下标，片断下标或子串范围，则赋值的前提是它们都已经获得具体的取值。 基于表达式结果的不同种类，赋值语句分为： ●固有赋值：固有赋值是把任意类型的值赋予一个非指针变量，或把一个指针变量赋 予一个与之相关联的目标。 ●自定义赋值：自定义赋值得以构成的前提是存在一个可访问的子例行程序，它包含 一个具有ASSIGNMENT形式的赋值界面，其属性与自定义赋值语句里的变量和表达式的属性保持一致。 ●指针赋值：指针赋值把一个指针变量关联到它的目标对象，或者说把一个目标对象 赋予到一个指针变量。在形式上它使用符号=>。 ●过滤数组赋值：这个赋值过程是对满足一定条件的数组元素进行赋值，而不是对数 组整体进行赋值。 ●并行指标数组赋值。这种赋值形式给出了一种有效的并行机制，能够大规模地对多 重指标变量进行赋值。 下面我们将分节讨论这5类赋值形式，首先给出一些例子如下：
Introduction to using the netCDF data format with Fortran 90 Michael Thorne (michael.thorne@https://www.doczj.com/doc/4f4076239.html,) Last Updated: July 20, 2010 I. Introduction NetCDF – Net work C ommon D ata F orm NetCDF is an array based data structure for storing multidimensional data. A netCDF file is written with an ASCII header and stores the data in a binary format. The space saved by writing binary files is an obvious advantage, particularly because one does not need worry about the byte order. Any byte-swapping is automatically handled by the netCDF libraries and a netCDF binary file can thus be read on any platform. Some features associated with using the netCDF data format are as follows: Coordinate systems: support for N-dimensional coordinate systems. ?X-coordinate (e.g., lat) ?Y-coordinate (e.g., lon) ?Z-coordinate (e.g., elevation) ?Time dimension ?Other dimensions Variables: Support for multiple variables. ? E.g., S-wave velocity, P-wave velocity, density, stress components… Geometry: Support for a variety of grid types (implicit or explicit). ?Regular grid (implicit) ?Irregular grid ?Points Self-Describing: Dataset can include information defining the data it contains. ?Units (e.g., km, m/sec, gm/cm3,…) ?Comments (e.g., titles, conventions used, names of variables (e.g., P-wave velocity), names of coordinates (e.g., km/sec),... Full documentation on the data format can be found at: ?https://www.doczj.com/doc/4f4076239.html,/software/netcdf/ - netCDF webpage ?https://www.doczj.com/doc/4f4076239.html,/software/netcdf/docs/ - Full netCDF documentation ?https://www.doczj.com/doc/4f4076239.html,/software/netcdf/docs/netcdf-f90/ - F90 Interface guide Naming convention: NetCDF files are generally named with the .nc extension.