FORTRAN知识点总结
Fortran程序总结
1.行的书写(行的长度、分行、续行)一行可以是0~132个字符，空格有意义，语句最长不超过2640个字符一行可以有多个语句，用“;”分隔一个语句可分行写，读行标记为&（放在尾部），但如为关键字，首尾均加&。
最多可有511个续行。
2.说明语句必须出现在可执行语句之前，格式说明语句（FORMAT语句）除外。
3.注释标志符：自由格式：！固定格式：C *语句分隔符：分号；（仅自由格式可以使用）续行符：自由格式：&申明标号：1到5位无符号整数空格：关键字、变量、常量内部不能用空格，但相邻两者之间须用空格4.信息处理的分类：数值处理和信息处理现代计算机工作原理：程序存储和程序控制（冯·诺依曼）1、运算器——算术运算、逻辑运算2、控制器——根据指令控制计算机工作运算器、控制器和寄存器称为中央处理器CPU3、I/O设备——提供数据传输服务4、总线——数据传输的公共通道1.机器语言：二进制代码形式，可以被计算机直接执行，不可移植2.汇编语言：用助记符来代替机器指令，容易记忆，不可移植3.高级语言：接近自然语言（英语）的程序设计语言，又称算法语言，易学、易用、易维护，可移植性好例：FORTRAN、BASIC、PASCAL、C、LISP、PROLOG等5.FORTRAN90程序是一种分块结构，由若干个程序单元块组成：主程序、外部子程序、模块、块数据单元无论是主程序单元，还是子程序单元，都是独立的程序单位，应该独立编写，它们的形式相似。
非语句行：注释语句：！后的所有字符都被编译器忽略。
可独占一行，也可在其它语句之后，空行为注释行（固定格式用C和*）6.常量的定义：常量是程序执行过程中不能变化的量。
基本数据类型有五种：整型、实型、复型、字符型和逻辑型前三种属于数值类型，后两种为非数值类型，主要用于文字处理和控制。
FORTRAN 90通过KIND值确定整数的存储开销、最大位数和取值范围，如表所示。
Fortran-第一讲--第一章
1.3.1 声明部分
声明由不可执行语句组成 位于程序开头 定义程序名和程序引用的数据以及变量类型
PROGRAM语句用来指定程序的名字 程序名最长可达31个字符 由字母、数字和下划线任意组合而成 第一个字符必须是字母 如果存在PROGRAM语句，它必须是程序的第一个语句行 例：下列程序名是否有效，如无效则说明原因 new_program 3rd
无效的实数表示： -12.0E1.5
例
下列各组数在计算机里表示的值是否一样 4650. 4.65E+3 -12.71 -1.27E1 0.0001 1.0E4 3.14159E0 314.159E-3
1.5.3 字符类型
字符类型由字符串组成 字符常数是由单引号或双引号括住的字符串 在单引号或双引号之间括起来的部分称为字符文本， 字符文本可以采用任意计算机可以表示的字符，而 不受Fortran字符集限制 如果字符文本中含有单引号该怎么办？
这一转换仅仅是指参与操作的两个操作数类型 分别为实数和整数而言
表达式
1 2 3 1+1/4 1.0+1/4 1+1.0/4
结果
1 1.0 1.25
因为混合运算的情况是如此复杂，所以我们在程序中要尽量避免这种情 况发生
练习
下面的程序段的三个赋值语句是否正确，正 确写结果，错误说明原因 INTEGER :: i,j INTEGER, PARAMETER :: K=4 i = K **2 j = i/K K=i+j
简单地说：学完本章，你应该可以编写除函数以外的简单程序
1.1 Fortran字符集
正如英语的学习从abc开始，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的一些格式上的区别。
fortran语言复习总结
2 表控输入 READ 语句：
类似 cin>>
READ * ,变量 1,变量 2,„
表控输出 PRINT 语句： 类似 cout<<
PRINT * ,表达式 1,表达式 2,„
3 PARAMETER 语句:给常数命名 位于类型声明后，可执行语句前
PARAMETER(名称 1=表达式 1,名称 2=表达式 2，„)
输入：
↙。
输出：
。
第六章 选择结构 同 C++，只是除逻辑 IF 语句，其他都需要有 END IF 对应
1 逻辑 IF 语句
IF(<逻辑表达式 e>) <语句 S>
e 为逻辑表达式或关系表达式,S 为可执行语句。
2 基本块 IF 语句
（1）IF(<逻辑表达式 e>)THEN
[<THEN 语句体>]
END IF
5 两种书写格式：固定格式和自由格式
6 数据类型：有内部数据类型、派生数据类型、数组和指针类型等
预定义内部数据类型
INTEGER→int、
REAL→float/double、
COMPLEX、
CHARACTER→char、
LOGICAL→bool
第四章 表控输入输出
1 三种类型输入输出:表控格式、二进制形式(无格式)、有格式
式不正确会致错
输出：例： PRINT 10,i,j,k
10 FORMAT(1X,'i=',I4,3x,'j=',I4,3x,'k=',I4)
w>实际长度，前补空格。
w<实际长度，输出 w 个“*”。
Fortran学习总结 - 我不是企鹅的日志 - 网易博客
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）以&续行，放在该行末或下行初。
以下都是讨论Fortran 90。
3、Fortran的一些特点，和C的一些不同其实很多，在下面涉及具体方面时可以看到。
第二章 关于FORTRAN的初步知识
前一页
休息
6
FORTRAN语言的常量
2：实型常量
有两种表示方法： （1）小数点法表示: 如： 12.5 0.12 12. .55等 （小数点表示） （2）科学计数法（指数）表示: 实数或整数E或e整数
如： 1.8635E2 5.d-1 等 （指数表示）
前一页 休息 7
FORTRAN语言的常量
3：双精度型常量
前一页
休息
14
FORTRAN语言的变量
2：隐含说明语句
implicit double precision (字母1，字母2）或（单个字 符），...... implicit complex (字母1，字母2）或（单个字符），...... implicit logical (字母1，字母2）或（单个字符），...... implicit character (字母1，字母2）或（单个字符），...... 其意义见前页。
5：逻辑型常量
逻辑型常量的表示: .true. 表示真值 .false. 表示假值
6: 文字型常量
文字型常量的表示： ‘若干个字符’ 例如：'abcdef' '123456xyz'
前一页 休息 10
FORTRAN语言的变量
标识符的命名规则：
以字母(不分大小写)开头，后跟若干个字母或数字。 变量类型： 1：隐含说明(约定) 凡不加说明的标识符，以字母I~N（ 或i~n)开头的为整型变量，以其它字母开头的变量为实 型变量。 2：显示说明语句 3：隐含说明语句
前一页 休息 12
FORTRAN语言的变量
1：显示说明语句
complex 若干个标识符彼此间用逗号分隔
定义的每一个标识符为复型变量。
fortran语言程序设计知识点
fortran语言程序设计知识点Fortran语言是一种面向科学与工程计算的编程语言，因其在数值计算和科学应用方面的高效性而受到广泛使用。
本文将重点介绍Fortran语言程序设计的一些重要知识点。
一、基础语法1.1 变量与数据类型在Fortran中，变量是用于存储数据的容器。
常见的数据类型包括整型（INTEGER）、实型（REAL/DOUBLE PRECISION）、复数型（COMPLEX）、逻辑型（LOGICAL）等。
变量的命名需遵循一定规则，如以字母开头，长度不超过31个字符等。
1.2 运算符与表达式Fortran支持常见的算术运算符（如+、-、*、/）以及逻辑运算符（如. AND.、. OR.、. NOT.）等。
表达式由变量、常数和运算符组成，可以进行数值运算和逻辑判断。
1.3 控制结构Fortran提供循环结构（DO）、条件结构（IF-THEN-ELSE）和选择结构（SELECT CASE）等控制语句，用于控制程序的流程。
二、数组与数据处理2.1 数组定义与操作Fortran中数组是由相同类型的数据元素组成的集合。
可以使用DIMENSION语句定义数组的维度和大小，通过下标访问和修改数组元素。
2.2 数组运算与函数Fortran提供了许多对数组进行运算和处理的函数，如数组求和（SUM）、最大最小值（MAX、MIN）、数组重排（RESHAPE）等，方便对数据进行统计和处理。
2.3 文件读写操作Fortran支持对文件进行读写操作，可以通过OPEN语句打开文件，使用READ和WRITE语句读取和写入数据。
可以根据需要设置文件的访问模式和格式。
三、过程与模块3.1 过程（Subroutine/Function）过程是一段独立的代码块，可接受传入参数并返回值。
在Fortran中，过程可以是子程序（Subroutine）或函数（Function）。
子程序用于完成一系列操作，而函数则返回一个值。
3.2 模块（Module）Fortran中的模块是一个编译单元，用于组织和管理相关的过程和变量。
fortran90-知识点整理
U(部件)
*:
系统约定设备
某个值: 指定通道号(设备逻辑号、文件号)
f(格式)
表控格式 I/O（*）: 系统约定的格式。 基本格式(自定格式)I/O：按用户要求的格式组织 I/0。 带控制信息表的 I/O：
I：碰到回车（ENTER）为一个记录。 O：一行为一个记录。
程序执行过程中按表控格式输入数据 各数据间有分隔符： ，或空格 类型匹配：整型:带小数点只取整数部分；
1、计算条件表达式的值
2、真
右边语句
IF 的下一个语句
3、假
IF 的下一个语句
注意：
1.右边通常为一条且只一条可执行语句。
错例：IF (A<B) T=A;A=B;B=T
2.不能为以下语句：
END、另一个逻辑 IF、 块 IF、ELSIF、ENDIF、DO
错例：IF（X<2）END
3.常应用于简单的条件赋值或条件转移（在循环结构中）
USE 模块 1，模块 2，…
基本语句概述 程序的最基本的语句主要有四种：类型说明语句、赋值语句、输入语句、输出语句。运用 这些基本的语句，就可以编写一些简单的程序。 内在函数 FORTRAN 90 配置的函数称为内在函数。内在函数分为三种： 基本函数 :
SIGN 符号 函数值：|A1|(若 A2>0)
整型→实型→ 双精度 →复型 例： 8/5+2.0*5/2=6.0（逐步转化）
赋值语句
1、类型要求 逻辑型、字符型的赋值语句要求“=”两边类型相同 数值型赋值，不区别整型、实型和复型 2、种别方面 字符型要求种别相同 其余类型的 e、V 种别允许不同 输入输出语句 1、I/O 的对象 ——列在<I/O 表>中
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
F O R T R A N第2章FORTRAN90基础知识：程序单元的概念:fortran90程序是一种分块形式的程序，整个程序由若干程序单元块组成。
每个程序只有一个主程序单元。
各单元体的程序体形式上相同。
程序单元可以是主程序、子程序（外部过程或内部过程）、模块MODULE （供其他程序单元引用即把该程序单元内的全部语句复制到程序单元中）或块数据程序单元BLOCK 。
语言元素：指在程序设计中用到的基本成分，如字符集、常量、变量、记号（标号、关键字、名字、常数、运算符和定界符）以及其他的基本结构等。
字符集：英文字母、阿拉伯数字、下划线、21个特殊字符（$和？没有规定用法）。
数据结构：整型INTEGER （34-2下划线后面是种别参数），n 位字长的计算机的数据表示范围一般为12~211-+---n n ，种别参数由内在询问函数KIND 送回，种别值提供的最小范围由内在函数SELECTED-INT-KIND 送回，表示十进制幂的范围由内在函数RANGE 送回；实型REAL ，小数形式和指数形式；复型COMPLEX （种别类型参数值取实部与虚部中较大者）；字符型CHARACTER，由一对单撇号或双撇号之间的字符序列组成；逻辑型LOGICAL。
派生数据类型TYPE；数组INTEGER,DIMENSION(1,50)::A，可直接对数组元素进行运算如3*A,SQRT(A)；字符子串，在字符串CHARACTER(LEN=80)::ROW中，ROW(1:3)就表示字符串ROW中第1到第3个元素组成的子串。
变量名的命名规则：不能超过31个字符；组成成分是字母、数字、下划线；第一个字符必须是字母。
第3章基本语句：类型说明语句：类型说明（种别说明），属性说明：：变量名表尽量避免把两个实数作相等或不相等的比较。
淘汰隐式说明IMPLICIT NONE种别说明：种别参数即对可移植数据精度和范围进行选择的机制KIND(X) 返回变元X的种别参数值SELECTED-REAL-KIND(n,m) 产生一个种别值，它表示某一精度和范围。
N指十进制有效位数，m指明值范围内以10为底的幂次。
种别表示方法：数值型常数、逻辑型常数的种别用后缀法表示，字符型用前缀法。
属性说明：PARAMETER常量名属性，如INTEGER,PARAMETER::N=5（N值不可更改）；DIMENSION数组属性，如INTEGERDIMENDION（1:10）：：X。
算术表达式：**乘方。
-→→括号+→→**或*求函数值/或ABS绝对值；MAX最大值；MIN最小值；SQRT平方根；MOD 求余数。
COS,SIN,TAN,ATAN,LOG 自然对数,LOG10常用对数，EXP指数，SIGN符号。
输入：READ(部件号，格式说明)输入如READ(5，'(I7)')X,Y I7表示每行输入一个整数，每个数占7个字符。
表控格式READ*,输入表；READ(*，*)输入表。
输出:WRITE(部件号，格式说明)输出表WRITE(6，'(1X,2F6.2)')X,Y 1X表示一个空格，F表示作实型编辑，6表示每个数占六列，2表示小数部分占两列，F前的2表示重复系数。
省略设备号PRINT格式说明，输出表表控格式WRITE(*,*)X,Y PRINT*，X,Y第4章选择结构程序设计：关系与逻辑表达式：> < == >= <= /=; .NOT. .AND..OR..EQV. .NEQV.混合运算符的优先级别:逻辑运算符→→关系运算符算数运算符括号→IF语句与IF结构的区别:IF语句：IF(e) SIF结构：IF(e1) THEN块1ELSEIF(e2) THEN块2ELSE块nENDIFCASE结构：SELECT CASE(MONTH)CASE(2)DAYS=28CASE(4,6,9,11)DAYS=30.........ENDSELECT第5章循环结构程序设计：不带循环变量的DO：[结构名：] DO循环体ENDDO[结构名] EXIT语句：停止循环，将控制转移到当前循环之外。
EXIT [DO结构名]CYCLE语句：在循环执行到该语句时，跳过循环体在它后面的那些语句，再从循环体的第1条语句开始执行。
CYCLE [DO结构名]带循环变量的DO：[结构名：] DO[,]v=u1,u2,[u3]循环体ENDDO[结构名]DOWhile结构: [结构名：] DOWHILE (逻辑表达式)循环体ENDDO[结构名]隐DO循环：（list,v=u1,u2,u3）如READ*,(A(I),I=1,5)第6章程序单元和过程：函数子程序：必须提供一个值，这个值赋给结果变量，成为函数的值。
[RECURSIVE]FUNCTION函数名（虚元表）RESULT（结果名）子例子程序：本身并不返回值，其计算结果全部通过虚实结合传递给主调程序。
必须通过CALL语句来调用。
CALL子程序名（实元表）[RECURSIVE]SUBROUTINE子程序名（虚元表）接口块：INTERFACE必须使用：实元是关键字变元时；实元是缺省的可选变元时；一个外部函数使用系统中的内部运算符扩展了原有的功能时；外部过程扩展了赋值号的使用范围时；使用一个类属名调用过程时；调用一个外部过程，该过程的结果是一个数组。
虚实结合：实元和虚元的个数相等，相应位置上的类型一致。
关键字变元：虚元名=实元表达式可选择变元：OPTIONAL属性：一虚元的类型说明语句中有OPTIONAL 属性便是可选变元。
PRESENT(X)函数：用来检查它的自变量X是否在程序执行部分出现。
当X出现时，函数值为“真”，否则为“假”。
虚过程：如果虚元是一个过程名时，作为虚元的过程称为虚过程。
只有潜逃调用至少两层以上时才能用虚过程。
模块：MODULE包含程序说明语句和过程，但不能直接运行。
其他程序引用模块实际就是将该模块中的全部语句复制到本程序单元，并且所有与模块中的名字相同的变量彼此取值相通，共享存储单元。
模块名对程序来说是全局的，不能与本程序中的任何程序单元名、外部名相同，也不得与模块内的任何局部名重名。
引用：USE模块1，模块2，....，模块nUSE模块名，ONLY：实体名表递归：递归调用是指过程内直接或间接地调用自己。
内部过程：如果一个过程不是写在主程序外，而是写在主程序单元之内，作为主程序内包含的一个过程，则该过程为内部过程。
通常没有说明语句，一般没有虚元。
类属过程：允许不同类型的实元与同一虚元结合，放宽了虚实结合必须一致的条件。
超载运算符：标准FORTRAN运算符通过恰当的过程扩展其功能，使其具有新的含义。
自定义运算符。
超载赋值：指把赋值的含义扩展到新的数据类型。
赋值号两边的类型必须相容。
第7章数组：数组基本概念：用DIMENSION属性说明之，同时给出数组元素的起止下标；使用数组时，即可直接使用数组某个元素，也可直接使用数组名。
数组片段：代表数组中的部分元素，可连续也可不连续。
如：A(3:6) 或A(10：30:2) 步长是2 数组构成器：赋值4个元素的数组：A=(/1,2,3,4/)其中(/1,2,3,4/)就是数组构成器例：A=(/(SQRT(REAL(I)),I=1,4)/)或A=(/V(3),V(6),V(7),V(9),/)二维数组按列存放：A→→A→→A→)1,1(A)2,2()2,3()2,1()1,3(A)1,2(ARESHAPE函数：将数组构成器中的一维数据重新构成任意形的数组。
例：A=RESHAPE(SOURCE=(/1,2,3,4,5,6,7,8,9，-1，-2，-3/)),SHAPE=(/3,4/)数组形式：常数组 REAL,DIMENSION(3:5+7)::A可调数组REAL,DIMENSION(M,N)::A假定形状数组REAL,DIMENSION(:,:)::A动态数组（可变）REAL,DIMENSION(:),ALLOCATABLE::A数组做变元，只能作为过程的实元不能是虚元。
数组运算：数组赋值A=B;数组表达式A+B（对应元素相加）；数组与标量A-5 (每个元素减5)；数组作为内在函数的实元B=ABS(A) B与A形状相同。
数组内在函数：求数组大小SIZE(A);求数组最大值元素MAXVAL(A)；求数组最小值元素MINVAL(A);求数组最大值元素下标MAXLOC(A)；求数组最小值元素下标MINLOC(A).;数组各元素之和SUM(A);数组各元素之积PRODUCT(A)；求数组维的下界LBOUND(A);求数组维的上界UBOUND(A)；数组转置TRANSPOSE(A). 屏蔽数组赋值：如WHERE(A<0)B=0 （相应元素）第8章字符型数据：字符常量：''或''''之间的若干字符字符变量（特有长度属性）：如CHARACTER(LEN=10，KIND=2)::A 字符子串：字符变量名（e1:e2）如NAME=''DAQINGPETROLUEM''则NAME(1:6)='DAQING' 字符表达式：指用字符运算符吧字符常量、字符变量或字符数组元素等字符型数据连接起来的有意义的式子。
字符运算符只有一个，就是字符连接符“//”。
如'HE'//'LLO'='HELLO'字符关系表达式，比较按字符的代码进行。
两字符串比较，以第一次出现不同字符的比较结果为准，字符个数不够时以空格补齐。
字符函数：求字符长度函数LEN(String)或LEN-TRIM(String);除去字符串尾部空格函数TRIM(String)；字符与字符序号相互转化，字符向字符序号ICHAR(CH)或IACHAR(CH)，字符序号向字符CHAR(I)或ACHAR(I);子串位置函数INDEX(String1，String2),String2是String1的子串，结果为正整数表示String2在String1最左边的子串的起始位置；字符串比较函数LGE(String1，String2)表示是1否大于等于2，LGT、LLE、LLT 分别表示是否大于、是否小于或等于、是否小于；首、尾部空格调整函数调左函数（把空格全调到尾部）ADJUSTL(String)或调右函数（把空格全调到首部）ADJUSTR(String)第9章派生类型和指针：派生类型：TYPE[存取方式描述：：]派生类型名成员组i类型说明ENDTYPE[派生类型名]说明：TYPE(派生类姓名)：：变量名[,...]指针：REALPOINTER::PT1，PT2 PT1=>XPT1=>PT2表示PT1指向PT2所指的目标，PT1和PT2都指向Y；PT1=PT2表示将PT2所指的目标的值赋给PT1所指的目标，X=Y。