Fortran语言基础 - 图文

山东建筑大学

文件命名。

编写一个程序或打开一个已有的程序。

选择Build菜单中的Execute选项，VF会编译并执行编译好的程序。

程序执行的结果。

5

数值分析程序设计——Fortran基础

最后再一次简单地说明编译程序的过程：

（1）建立一个新的Project（File/New，选择Project选项卡，选择Fortran

Console Program格式，给定Project名称）。Project会保存成*.dsw文件。

（2）生成一个新的程序文件（File/New，选择Files选项卡，选择Fortran

Free Format Source File，给定文件名），或是插入一个已有的程序文件（选项Project/Add to Project/Files）。程序代码会保存成*.f90或*.for文件。

（3）用Build菜单中的Execute选项来编译并运行程序，或只是单击Build

选项来只作编译，不运行程序。

（4）要写新的程序可以另外建立一个新的Project，或是直接更换Project

中的文件。千万不要把两个独立的程序文件放在同一个Project中，否则导致编译过程出现错误。

（5）下次修改程序时，可以直接使用File/Open Workspace来打开*.dsw的

Project工程文件。 作业：

1、熟悉Fortran编译器的使用方法。

6

山东建筑大学

1 Fortran语言基本概念

1.0 程序书写格式

Fortran程序代码的编写格式有两种：Free Format（自由格式）和Fixed Format（固定格式）。

固定格式属于旧式写法，他在编写版面上有很多限制。自由格式是Fortran90之后的新写法，取消了许多旧的限制。Fortran程序代码扩展名为*.F或*.FOR的文件是以Fixed Format编写的程序；以*.F90为扩展名的文件，是以Free Format编写的程序。今后我们编写的程序建议采用自由格式编写。 1.0.1 Fixed Format（固定格式）

在固定格式中，规定了程序代码每一行中每个字段的意义。第7~72个字符是可以用来编写程序的字段。每一行的前5个字符只能是空格或者是数字，数字用来作为“行代码”。每一行的第6个字符只能是空格或者“0”以外的字符。

第1个字符：如果是字母C,c或者星号*，这一行文本会被当作说明批注，不会被编译。

第1~5个字符：如果是数字，就是用来给这一行程序代码取个代号。不然只能是空格。

第6个字符：如果是“0”以外的任何字符，表示这一行程序会接续上一行；

第7~72个字符：Fortran程序代码的编写区域。

第73个字符之后：不使用，超过的部分会被忽略，有的编译器会发出错误信息。

C FIXED FORMAT DEMO program main write(*,*) '15000.789' 10

7

数值分析程序设计——Fortran基础

write(*,*) 1'Hello'

100 write(*,*) 'Hello' 10 stop end

注意：程序中的空格，没有任何意义。固定格式是配合早期使用穿孔卡片输入程序所发明的格式。熟悉固定格式，有助于阅读早期的Fortran程序代码。 1.0.2 Free Format（自由格式）

自由格式基本上允许非常自由地编写格式，他没有规定每一行的第几个字符有什么作用。需要注意的事项只有以下几点：

（1） 叹号“！”后面的文本都是注释； （2） 每一行可以编写132个字符； （3） 行号放在每行程序的最前面；

（4） 一行程序代码的最后如果是符号“&”,代表下一行程序会和这一行

连接。如果一行程序代码的开头是符号&，代表它会和上一行程序连接。

看一个自由格式编写的程序： ! Free Format program main

write(*,*) \! 这也是注解 write(*,*) & \wr&

&ite(*,*) \end

1.1 字符集

字符集是指编写Fortran程序时，所能使用的所有字符及符号。Fortran所能使用的字符集有：

英文字母：A~Z及a~z（英文字母不区分大小写）； 数字：0~9；

22个特殊符号： ：= + - * / . ‘ ! “ % & ; < > ? $ _（还有一个显示不出来的空格符）

8