(完整)Fortran经典编程语言笔记(你值得拥有)
(完整)Fortran经典编程语言笔记(你值得拥有)
FORTRAN笔记2014.10.07目录第七讲_FORTRAN的基本知识.ppt (2)FORTRAN语言程序设计初步 (2)FORTRAN源程序的书写格式（以77为例） (2)变量 (2)变量类型 (2)算术运算符和运算优先级 (3)赋值语句 (3)参数语句（PARAMETER语句） (3)END语句 (3)PAUSE语句 (3)逻辑运算和选择结构 (4)关系表达式 (4)FORTRAN中数组的定义及使用 (4)其他 (5)1. fortran语言定义CHARACTER*6 TTL(14,3),CNAM(400)是什么意思? (5)2. fortran里character*10 是什么意思 (5)3. Fortran中kind是什么函数？ (5)第七讲_FORTRAN的基本知识.pptFORTRAN语言程序设计初步FORTRAN是Formula Translation的缩写，意为“公式翻译”，它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的问题而设计的，其数值计算的功能较强。
常用的是FORTRAN77和FORTRAN90两种标准。
1、一个程序由若干个程序单位组成。
主程序和每一个子程序分别是一个独立的程序单位。
2、每一个程序单位都是以“END”结束的。
3、一个程序单位包括若干行。
1）语句行。
由一个FORTRAN语句组成。
2）非语句行，即注释行。
4、FORTRAN程序中的语句可以没有标号，也可以有标号，根据需要而定。
标号的作用是标志一个语句以便被其他语句引用。
5、一个程序单位中各类语句的位置是有一定规定的。
6、FORTRAN源程序必须按一定的格式书写。
FORTRAN源程序的书写格式（以77为例）每一行有80列，分别如下：1、第1-5列为标号区。
一行中第一列为“C”或“*”，该行即被认为是注释行。
2、第6列为“续行标志区”，如果在一行的第6列上写一个非空格和非零的字符，则该行作为其上一行的续行。
fortran语言语法
FORTRAN是世界上最早出现的高级编程语言，是工程界最常用的编程语言，它在科学计算中（如航空航天、地质勘探、天气预报和建筑工程等领域）发挥着极其重要的作用。
经过40多年的发展，伴随着FORTRAN语言多次版本的更新及相应开发系统的出现，其功能不断完善，最新版本的开发系统几乎具备了VC、VB的所有特点，如图形界面编程、数据库等。
目前，工科院校开设的计算机编程语言课首选仍然是FORTRAN :<说实话，从科技发展的趋势来说这不是好事。
您可以设想一下，如果需要用鹅毛笔抄写大量的古籍是什么感受！强烈建议阅读《发掘C#特性赋予科学计算项目以威力》1 FORTRAN77四则运算符+ - * / ** (其中**表示乘方)在表达式中按优先级次序由低到高为： +或-→*或/→**→函数→()2 FORTRAN77变量类型隐含约定：I-N规则凡是以字母I，J，K，L，M，N六个字母开头的，即认为是整型变量，其它为实型变量。
用类型说明语句确定变量类型：可以改变I-N规则用IMPLICIT语句将某一字母开头的全部变量指定为所需类型如IMPLICIT REAL (I,J)三种定义的优先级别由低到高顺序为：I-N规则→IMPLICIT语句→类型说明语句，因此，在程序中IMPLICIT语句应放在类型说明语句之前。
数组的说明与使用使用I-N规则时用DIMENSION说明数组，也可在定义变量类型同时说明数组，说明格式为：数组名(下标下界,下标上界），也可省略下标下界，此时默认为1，例：DIMENSION IA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3)REAL IA(10),ND(80:99)使用隐含DO循环进行数组输入输出操作：例如WRITE(*,10) ('I=',I,'A=',A(I),I=1,10,2)10FORMAT(1X,5(A2,I2,1X,A2,I4))使用DATA语句给数组赋初值变量表中可出现变量名,数组名,数组元素名,隐含DO循环，但不许出现任何形式的表达式：例如DATA A,B,C/,,DATA A/,B/,C/DATA A,B,C/3*CHARACTER*6 CHN(10)DATA CHN/10*'?????'/INTEGER NUM(1000)DATA (NUM(I),I=1,500)/500*0/,(NUM(I),I=501,1000)/500*1/3 FORTRAN77程序书写规则·程序中的变量名，不分大小写；·变量名称是以字母开头再加上1到5位字母或数字构成，即变更名字串中只有前6位有效；·一行只能写一个语句；·程序的第一个语句固定为PROGRAM 程序名称字符串·某行的第１个字符至第５个字符位为标号区，只能书写语句标号或空着或注释内容；·某行的第１个字符为Ｃ或＊号时，则表示该行为注释行，其后面的内容为注释内容；·某行的第６个字符位为非空格和非０字符时，则该行为上一行的续行，一个语句最多可有19个续行；·某行的第７至７２字符位为语句区，语句区内可以任加空格以求美观；·某行的第７３至８０字符位为注释区，８０字符位以后不能有内容。
Fortran学习笔记
end program DeclareVariable
program readwrite implicit none !说明部分 integer::i,j,k
real::p,q,r !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! print *,"请输入 3 个数据：" read (*,'(3I7)'),i,j,k ! 第一个参数*是部件号，第二个参数是格式说明 ! 格式说明'(~)',其中～由三部分组成，mTn,m 代表每行读入 T 类型的数据 m 个，T 是 数据类型，n ! 是读入宽度,如果'(3I7)'， ! 输入 123456723456783456789 时，i=1234567,j=2345678,k = 3456789, ! 输入 12 234 34567 时，i=12,j=234,k = 34567 ! 系统自动截取前 7 位，换成数据，再 7 位换成数据...... print *,i,j,k !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! print *,"请输入 3 个数据：" read (*,'(I7)'),i,j,k ! 第一个参数*是部件号，第二个参数是格式说明 ! 格式说明'(~)',其中～由三部分组成，mTn,m 代表每行读入 T 类型的数据 m 个，T 是 数据类型，n ! 是读入宽度,如果'(I7)'， ! 则从每行中截取一个数据，不管该行有多长 ! print *,i,j,k
Fortran 95学习笔记
署名循环
循环还可以取“名字”，这个用途是可以在编写循环是能明白地直到End do这个描述的位置是否正确，尤其是在多层循环当中。署名的循环也可以配合Cycle、exit来使用。
数组（Array）
数组的声明方法：Datatype name(size)
赋初值：
real ::a,b
real ::add
add =a+b
return
end
全局变量
Common是fortran77使用“全局变量”的方法，它用来定义一块共享的内存空间
program ex
implicit none
integer ::a,b
common a,b !定义a，b是全局变量中的第1及第2个变量
Character(len=30) ::name
Integer ::age
Integer ::length
Integer ::weight
End type person
Type(person) ::a !声明一个person类型的变量
a%name !引用person中的name
Kind的使用
Kind描述如果搭配上一些Fortran90的库函数，可以增加程序代码的“跨平台”能力
Implicit real(M-P) !M到P开头的变量都视为浮点数
Implicit none !关闭默认类型功能，所有变量都要事先声明
常数的声明方法（Parameter）
Program ex
Implicit none
Real ::pi
Parameter(pi = 3.14129)
Write(*,”(F4.2)”) sin(pi/6)
fortran笔记
不要把两个独立的程序文件放入同一个Project中，否则会导致编译过程的出现错误。
不区分大小写，小写字母会被视为大写。
有自由格式（.F90）和固定格式(.F/.FOR)两种，建议用.F90。
运算符+-*、**（乘幂，两个星号要连续）比如2的2次方要写成2**2。
注意括号的使用，如（(A+B)*(C+D)）/(2*(E+F))，不要漏掉。
乘号不能省略，2*A不能写成2A。
Program描述开头，后面接自定义的程序名称。
想不出名称建议使用MAIN。
程序最后END。
STOP程序结束。
连续两个双引号可以打出一个双引号。
！后面是注释，最后&，下一行与这一行连接；开头是&，与上一行连接。
同一个单次也可以用&分在两行。
空格无意义。
每行132个字符。
数据类型：整型INTEGER、浮点数REAL、复数COMPLEX、字符CHARACTER、逻辑判断LOGICAL 1代表TRUE，0代表FALSE。
可以integer a; a=2*3+1 a=一个表达式，若a=3/2 会得到1，因为整型会舍去小数部分。
Integer (kind=2) a 或者integer*2 a或者integer(2) a短整型integer (kind=4) a 长整形integer a,b,c同时声明多个。
Real(kind=4) b 单精度浮点数，Real(kind=8) b 双精度浮点数，单精度有效位数为6-7位，双精度为15-16位，精确到时候应使用双精度。
注意：real a;a=2.5+3/2会得到3.5，因为3/2被当成了整型，应改成a=2.5+3.0/2.0保证被当成浮点数而不是整型来处理。
单精度浮点数用E，2.5E11表示2.5乘以10的11次方。
双精度浮点数用D，2.2D3=230字符character(len=10) character(10) character*10 a 申明字符数为10的字符串。
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中的模块是一个编译单元，用于组织和管理相关的过程和变量。
fortran知识点总结
fortran知识点总结一、语法结构Fortran语言的语法结构遵循一套严格的规则。
下面是一些常见的语法结构：1. 程序单元：Fortran程序由一个或多个程序单元组成。
每个程序单元由一个或多个声明和执行语句组成。
2. 注释：在Fortran中，注释可以用来提高代码的可读性。
注释以感叹号（!）开头，直到行末为止。
3. 标识符：Fortran中的标识符由字母、数字和下划线组成，且区分大小写。
标识符用于表示变量、函数、子程序等。
4. 变量声明：在Fortran中，变量声明使用关键字“REAL”、“INTEGER”、“LOGICAL”等来指定变量的数据类型。
例如，REAL :: x 表示声明了一个实数类型的变量x。
5. 程序控制结构：Fortran提供了多种控制结构，包括顺序结构、条件结构和循环结构。
这些结构提供了程序的流程控制和逻辑控制。
6. 函数和子程序：Fortran支持函数和子程序的定义和调用。
函数和子程序可以帮助程序员组织和重用代码。
7. 模块和接口：Fortran中的模块和接口提供了一种组织代码的方式。
模块可以包含多个子程序和全局变量，接口可以用来定义子程序的接口。
二、数据类型在Fortran中，数据类型用于表示数据的类型和大小。
Fortran提供了多种数据类型，包括整数、实数、逻辑值、字符、复数等。
下面是一些常见的数据类型：1. 整数：整数类型用于表示整数值。
在Fortran中，整数类型包括“INTEGER”、“LOGICAL” 和“CHARACTER”类型。
2. 实数：实数类型用于表示实数值。
在Fortran中，实数类型包括“REAL”和“COMPLEX”类型。
REAL类型用于表示实数，COMPLEX类型用于表示复数。
3. 字符：字符类型用于表示字符值。
在Fortran中，字符类型使用CHARACTER关键字进行声明。
字符类型可以表示单个字符或者字符数组。
4. 数组：数组类型用于表示多个相同类型的数据。
Fortran语法
Fortran语法（转载）2010-08-02 09:45目录：一、说明二、概述三、数据类型及基本输入输出四、流程控制五、循环六、数组七、函数八、文件一、说明本文多数内容是我读彭国伦《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程序。
以下是77和90的一些格式上的区别。
Fortran 77：固定格式（fixed format），程序代码扩展名：.f或.for（1）若某行以C,c或*开头，则该行被当成注释；（2）每行前六个字符不能写程序代码，可空着，或者1~5字符以数字表明行代码（用作格式化输入输出等）；7~72为程序代码编写区；73往后被忽略；（3）太长的话可以续行，所续行的第六个字符必须是"0"以外的任何字符。
《FORTRAN-95程序设计》学习笔记
《FORTRAN-95程序设计》学习笔记《FORTRAN 95程序设计》学习笔记66RPG gg★目录★《FORTRAN 95程序设计》学习笔记 (2)基础知识(基础、字符串、FORMAT、隐式、TYPE)............................. 错误!未定义书签。
流程与控制(if、select、do) (8)数组(声明、隐式循环、整体操作、可变数组) (10)函数与子程序(子程序、函数、全局变量)13MODULE与面向对象(重载操作符、虚函数) (18)文件相关(OPEN、WRITE、READ) (20)指针（指向变量、数组、函数） (22)Visual Fortran 编译器（DLL，VB调用） (24)数值算法与IMSL（数值算法插件） (28)常用库函数（数学、数组、零碎、子程序） (30)◆10^10⏹复数：complex :: a=(2,3)◆实部：real(a) ；虚部：imag(a)⏹布尔型：Logical，.true. 和.false.★【语法与函数】字符串：character(20) string ⏹注意理解，fortran的弱智字符串就是一个长度不能变的一维的东西，极其猥琐，和Java、Ruby不能相提并论的⏹string(13:13) = “a”：对第13个字节的读、存⏹string(2:3) = “go”⏹string(6) = “我的妈呀”：从第6个位置开始设置为“我的妈呀”⏹a = string_a // string_b：用“//”连接两个字符串⏹【常用函数】char(num)，ichar(char)：ASCII码的转换相关功能⏹【常用函数】len(string)，len_trim(string)：长度，去掉尾部空格后的长度⏹【常用函数】index(string,key)：找key在string首出现的位置⏹【常用函数】trim(string)：返回去掉尾部空格的字符串(用途不大)⏹【函数】repeat(char,int)：返回一个重复int次的char串⏹character(len=20) string 普通声明；character(len=*) string 接收的时候可自动长度★【规范格式】FORMAT格式化⏹e.g.◆w rite (*,100) A◆100 format(I4) ←这里是100号标识调用的格式⏹参数控制符(前面加数字为重复次数，如4I6或<a>I6。
读有限元Fortran程序笔记
读有限元程序笔记1.ALLOCATABLE::COORD(:,:),PROPS(:,:,:) !声明两个可变大小的数组，COORD(:,:)是二维数组，PROPS(:,:,:)是三维数组。
2.Fortran程序行首为C代表改行为注释，不会被编译3.全局变量（common），不同的程序之间，也就是在不同的函数之间或者是主程序跟函数之间，除了可以通过传递参数的方法来共享内存，还可以通过“全局变量”来让不同程序中声明出来的变量使用相同的内存位置。
4.Dimensional维的，viscoplastic塑性的，elastic有弹力的，finite有限的，element元素，program程序。
5.THREE DIMENSIONAL ELASTIC-VISCOPLASTIC FINITE ELEMENT PROGRAM三维弹塑性有限元程序6.Module可以用来封装程序模块，通常是用来把程序中，具备相关功能的函数及变量封装在一起。
程序在开始定义了一个module模块，在模块中定义了MXKKK=50000000，MXGSJ=1000，MXGSJ=1000三个常量（PARAMETER表示常量），并且每个常量都赋了值。
在module模块中定义了NELEM,NPOIN,NPROP,MXDFN,NSTEP,IDEVP,IDDP,LTYPE以及NFIX1,NPL,NVL,NSL,NHL,NTL,IDCVG,NTOTV,NKK以及DTIME,TOLER,SCALE,DSCALE这些全局变量（common表示全局变量），定义了ICM(3,8),CGAUS(2),VSHAP(8,8),DERIV(3,8,8)以及POSGP(3),COPG(3),EJ(3,3),EJACI(3,3),R(8,8)这些维数与大小都确定的全局数组变量，定义了COORD(:,:),PROPS(:,:,:)以及STRSG(:,:,:),DJ(:,:),CARTD(:,:,:,:)以及TRANJ(:,:,:,:),DJRMX(:,:,:)以及DREMX(:,:,:),DJEMX(:,:,:,:)以及CREMX(:,:,:),CJEMX(:,:,:,:)以及MELEM(:,:),MPROP(:),ISSOR(:,:),NNDEX(:)以及MPFIX(:,:),MPSJ(:),MMATP(:),MPIV(:)以及TSTIF(:)以及ADISP(:),TDISP(:),ALOAD(:)以及PSNBR(:,:,:),PSNBJ(:,:)以及PSTNR(:,:,:),PSTNJ(:,:)以及STRSP(:,:),STRSJ(:,:)这些维数确定但是大小不确定的可变大小的数组，ALLOCA TABLE表示可变大小的数组变量。
FORTRAN知识点总结
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) 产生一个种别值，它表示某一精度和范围。
fortran语言语法
FORTRAN是世界上最早出现的高级编程语言，是工程界最常用的编程语言，它在科学计算中（如航空航天、地质勘探、天气预报和建筑工程等领域）发挥着极其重要的作用。
经过40多年的发展，伴随着FORTRAN语言多次版本的更新及相应开发系统的出现，其功能不断完善，最新版本的开发系统几乎具备了VC、VB的所有特点，如图形界面编程、数据库等。
目前，工科院校开设的计算机编程语言课首选仍然是FORTRAN :<说实话，从科技发展的趋势来说这不是好事。
您可以设想一下，如果需要用鹅毛笔抄写大量的古籍是什么感受！强烈建议阅读《发掘C#特性赋予科学计算项目以威力》1 FORTRAN77四则运算符+ - * / ** (其中**表示乘方)在表达式中按优先级次序由低到高为：+或-→*或/→**→函数→()2 FORTRAN77变量类型2.1隐含约定：I-N规则凡是以字母I，J，K，L，M，N六个字母开头的，即认为是整型变量，其它为实型变量。
2.2用类型说明语句确定变量类型：可以改变I-N规则2.3用IMPLICIT语句将某一字母开头的全部变量指定为所需类型如IMPLICIT REAL (I,J)三种定义的优先级别由低到高顺序为：I-N规则→IMPLICIT语句→类型说明语句，因此，在程序中IMPLICIT语句应放在类型说明语句之前。
2.4数组的说明与使用使用I-N规则时用DIMENSION说明数组，也可在定义变量类型同时说明数组，说明格式为：数组名(下标下界,下标上界），也可省略下标下界，此时默认为1，例：DIMENSION IA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3) REAL IA(10),ND(80:99)使用隐含DO循环进行数组输入输出操作：例如WRITE(*,10) ('I=',I,'A=',A(I),I=1,10,2)10FORMAT(1X,5(A2,I2,1X,A2,I4))2.5使用DATA语句给数组赋初值变量表中可出现变量名,数组名,数组元素名,隐含DO循环，但不许出现任何形式的表达式：例如DATA A,B,C/-1.0,-1.0,-1.0/DATA A/-1.0/,B/-1.0/,C/-1.0/DATA A,B,C/3*-1.0/CHARACTER*6 CHN(10)DATA CHN/10*' '/INTEGER NUM(1000)DATA (NUM(I),I=1,500)/500*0/,(NUM(I),I=501,1000)/500*1/3 FORTRAN77程序书写规则•程序中的变量名，不分大小写；•变量名称是以字母开头再加上1到5位字母或数字构成，即变更名字串中只有前6位有效；•一行只能写一个语句；•程序的第一个语句固定为PROGRAM 程序名称字符串•某行的第１个字符至第５个字符位为标号区，只能书写语句标号或空着或注释内容；•某行的第１个字符为Ｃ或＊号时，则表示该行为注释行，其后面的内容为注释内容；•某行的第６个字符位为非空格和非０字符时，则该行为上一行的续行，一个语句最多可有19个续行；•某行的第７至７２字符位为语句区，语句区内可以任加空格以求美观；•某行的第７３至８０字符位为注释区，８０字符位以后不能有内容。
Fortran语法备忘录（初级）
Fortran语法备忘录（初级）转自：最简单的fortran程序：END•目录：•【注释】•【并行】•【续行】•【程序开始】•【常量】◆整型◆实型◆复型◆逻辑型◆字符◆例子◆其他进制•【变量】•【变量声明】◆类型说明&种别说明◆属性说明◆例子◆赋初值•【数组】◆三元下标◆向量下标◆数组赋值◆数组运算◆WHERE构造◆FORALL构造◆函数名称◆动态数组•【派生类型】•【算术运算】•【关系运算】•【逻辑运算】•【判断IF构造】•【GOTO循环】•【DO循环】◆隐DO循环◆无循环变量◆跳出循环◆DO WHILE •【多重选择CASE构造】•【READ,WRITE 输入输出】◆文件◆WRITE语句◆READ◆I/O列表◆OPEN◆CLOSE◆定位语句◆内部文件•【FORMAT语句】•【一些说明】•【一些建议】••【注释】•整行注释，第一个字母为 C 或者 *•附加注释，与句后面用！•!--------------------------------------------------------•! 说明(F90)•!--------------------------------------------------------•【并行】•!--------------------------------------------------------•a=1.0 ; b=2.0•!--------------------------------------------------------•【续行】•F90中一行为132列，允许有39个续行。
在语句行最后加上续行符“&”号。
如果字符串被打断，跨2行以上,则在续行的开始位置也要加&号。
•第6列上写一个非空格和非零的字符(任何ASCII字符), 常用C •【程序开始】•!--------------------------------------------------------•PROGRAM main•END PROGRAM main•!--------------------------------------------------------•【常量】•◆整型 (默认4字节)•100_1 !单字节整型常量•2000•2000_4 !4字节整型常量•◆实型 (默认4字节)•print *, 3.14159265358979_8 ! 直接打印双精度数•print *, 3.14159265358979_4 ! 直接打印单精度数(7位有效数字)•◆复型 (默认2×4字节)•(a,b)=(实数,实数)•◆逻辑型 (默认4字节) .TRUE. 和 .FALSE.•a=.TRUE.•◆字符型 (F90用"")•name="char"•例："I'm a boy." (长为10字节)•'I''m a boy.' (长为10字节)•字符子串：•A(3:11) -> 'CDE12345F'，•A(I+4:9) -> 'E1234'(I=1)，'1234'(I=2)•A(:5) -> 'ABCDE'•A(11:) -> 'FGH'•A(:) -> 'ABCDE12345FGH'•A(3:3) -> 'C'•A=A(:5)//A(6:) !字符串的合并运算•求字符串长度的函数：LEN(字符串)•不计尾部空格的字符串长度函数：LEN_TRIM(字符串)•求子串在父串位置的函数：INDEX•验证字符串的函数：VERIFY•除去尾部空格函数：TRIM•比较字符大小的函数：LGE、LGT、LLE、LLT•••◆例如：•21_2+7.6_4 表示整型种别为2的数21与实型种别为4的数7.6相加。
Fortran经典编程语言笔记(你值得拥有)
FORTRAN笔记2014.10.07目录第七讲_FORTRAN的基本知识.ppt (2)FORTRAN语言程序设计初步 (2)FORTRAN源程序的书写格式（以77为例） (2)变量 (2)变量类型 (2)算术运算符和运算优先级 (3)赋值语句 (3)参数语句（PARAMETER语句） (3)END语句 (3)PAUSE语句 (3)逻辑运算和选择结构 (4)关系表达式 (4)FORTRAN中数组的定义及使用 (4)其他 (5)1. fortran语言定义CHARACTER*6 TTL(14,3),CNAM(400)是什么意思? (5)2. fortran里character*10 是什么意思 (5)3. Fortran中kind是什么函数？ (5)第七讲_FORTRAN的基本知识.pptFORTRAN语言程序设计初步FORTRAN是Formula Translation的缩写，意为“公式翻译”，它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的问题而设计的，其数值计算的功能较强。
常用的是FORTRAN77和FORTRAN90两种标准。
1、一个程序由若干个程序单位组成。
主程序和每一个子程序分别是一个独立的程序单位。
2、每一个程序单位都是以“END”结束的。
3、一个程序单位包括若干行。
1）语句行。
由一个FORTRAN语句组成。
2）非语句行，即注释行。
4、FORTRAN程序中的语句可以没有标号，也可以有标号，根据需要而定。
标号的作用是标志一个语句以便被其他语句引用。
5、一个程序单位中各类语句的位置是有一定规定的。
6、FORTRAN源程序必须按一定的格式书写。
FORTRAN源程序的书写格式（以77为例）每一行有80列，分别如下：1、第1-5列为标号区。
一行中第一列为“C”或“*”，该行即被认为是注释行。
2、第6列为“续行标志区”，如果在一行的第6列上写一个非空格和非零的字符，则该行作为其上一行的续行。
Fortran笔记
1、external 用来声明自定义函数2、intrinsic 用来声明库函数3、intent(in) 指定参数为只读，不能改变值4、intent(out) 指定参数在程序中应重新设置数值。
5、intent(inout) 参数既可读又可写6、interface 使用接口当函数名称当成参数传递出去时，这两个声明不可以省略；如果纯粹氢函数拿来讲算使用，不把它当成参数传递出去，声明者自定义函数可以省略EXTERNAL,声明库函数的一行都可以完全省略。
注：在一般情况下，使用函数时不需要特别说明它们的“使用接口”，不过在下面这些情况下是必要的：（1）函数返回值为数组时（2）指定参数位置来传递参数时（3）所调用的函数参数数目不固定时（4）输入指标参数时（5）函数返回值为指针时7、random函数注：使用随机数前要先调用random_seed这个子程序来启动随机数生成器，启动之后就可以经过调用random_number来得到一个0～1之间的随机数。
8、recursive递归时使用（回归的，递归的）Result的使用能够递归执行的函数有一个必要条件，那就是递归函数每次被调用执行时，函数中所声明的局部变量都会使用不同的内存地址。
简单地说，函数中的局部变量在每次调用时都是独立存在的。
Fortran90标准中，递归函数一定要作用Result 来改名。
9、saveStatement and Attribute Preserves thevalues of a variable after the execution of aRETURN or END statement in a procedure.Statement SyntaxSAVE [name]10、pure 用来配合并行运算使用。
使用pure函数时有很多限制：（1）pure函数的参数都是只读intent(in)。
（2）pure子程序的每个参数都要赋值属性。
（3）pure函数中不能使用save。
Fortran编程必备参考
/share/detail/24946126Just as in Basic we use TAB and PRINT USING commands to more precisely control program output, in Fortran we can usewrite commands with format statements. While these can get complicated, the most commonly used options are pretty easy to use. A typical write statement iswrite (*,20) x, y, z .The "*" in the parentheses instructs Fortran to write to the screen, while "20" refers to the label ofthe format statement for thiswrite command. The x, y, and z are the variables to be printed.A format statement for this write command might be20 format (3f10.4) .Inside the parentheses, the "3" indicates that 3 entities will be printed, the "f" denotes that these willbe floating point real numbers (not exponential notation), the "10" stipulates that 10 places will be used for printing (counting the sign, decimal point, and the digits), and ".4" mandates 4 digits after the decimal point. Some printouts formatted this way are12345.6789 , -1234.5678 , 10002.3400 .The letter "f" in this context is a format code letter; here are some of the more commonly used format code letters, with their implications:f real number, floating point formate single precision real number, exponential notationd double precision real number, exponential notationi integera text string (character)x space/vertical space (line feed)t tab indicatorStrings (in quotes) may be placed in format statements, separated by commas. Here are examples of write statements with corresponding format statements; at the right of each is a description of the corresponding output:write (*,10) n, x, y10 format (i4,4x,f10.4,2x,f10.4)integer n printed using 4 places, then 4 spaces, then real numbers x and y printed with 2 spaces between, each using 10 places and 4 decimal placeswrite (*,20) area20 format ("The area is ",f8.5)string in quotes is printed, then the real number area is printed, using 8 places with 5 decimal placeswrite (*,30) "The area is ", area30 format (a,f8.5)same output as immediately abovewrite (*,40) x, y, z 40 format (3d20.14)3 double precision numbers x, y, z printed, each reserving 20 spaces, with 14 decimal placeswrite (*,50) student, score 50 format (a20,4x,i3)student, a text string up to 20 characters, is printed, then 4 spaces, then score, an integer using a maximum of 3 placeswrite (*,60) r, A60 format (t10,f4.2,/,t10,f6.2)tabs to column 10, prints real number r, goes to next line, tabs to column 10, prints real number AYou can use loops with format statements to print arrays; here are examples:do i = 1, 10 write (*,70) a(i) end do an array a of real numbers, indexed from 1 to 10, is printed; each entry occupies 5 places with70 format (f5.2) 2 decimal places, and is printedon a separate linewrite (*,80) (a(i), i = 1, 10)80 format (f5.2)same output as immediately abovewrite (*,90) (a(i), i = 1, 10) 90 format (10f5.2)same output as above, except that all entries are printed on the same linedo i = 1, 5write (*,7) (m(i,j), j = 1, 6) 7 format (6i3)end do prints a 5 x 6 two-dimensional array m of integers, with each integer entry m(i,j) occupying 3 places. Each row of the matrix appears on its own line.Following are examples of stored values, formatting specifications for printing the values, and resulting output. (The "^" symbol indicates a blank).Stored Value Format Specifier Output1.234567f8.2^^^^1.230.00001f5.30.000-12345i5*****-12345i6-1234512345i6^123450.00001234e10.3^0.123E-040.0001234e12.4^^0.1234E-031234567.89e9.2^0.12E+07aloha a8^^^aloha1.23456789123D0d17.10^0.1234567891E+01 Fortran format格式说明2. 字符返回。
fortran 自学笔记
Error: An automatic object is invalid in a main program.
！parameter(pi=3.1415927,J=10) parameter(pi=3.1415927,J=10.0) real :: h=1.0/J do i=1,J-1 u(i)=sin(i*pi*h) !正确写法 ！注意： real :: h=1/J，这样写也是不行的 ！即使 J=10.0 循环依然可以继续
INTEGER AA(22,22)
DO 20 I=1,22 DO 20 J=1,22 20 END 对于字符串： AA(I,J)=I+I*100 WRITE(*,“(22I8)”)((AA(I,J),J=1,22),I=1,3 ) ！也可写成 DO20I=1,22 !如果是将AA全部输出22可以是 大于22的任意个整数，输出仍 然是每行22个数据，但是当只 输出AA的一部分，则格式较死，
必须写你需要的数字,原因未知
FORTRAN 90可以用“”来封装字符串 FORTRAN 77只能用单引号来封装字符串 FORTRAN 77:‘’:字符串; “”：引用符
***************************************************************பைடு நூலகம்******
数字型字符<--->数字 字符串数字 character(len=30)::aa real b 数字字符串： character(len=30)::aa real b 带小数点的数据转换: character(len=30)::aa real b
fortran语言知识点总结
fortran语言知识点总结Fortran语言知识点总结：1. 基本语法和数据类型Fortran的基本语法和数据类型与其他编程语言类似，包括变量声明、赋值、条件语句、循环语句等。
在Fortran中，变量可以使用不同的数据类型进行声明，包括整数、实数、逻辑型和字符串型。
此外，Fortran还支持数组类型，可以方便地处理多维数组数据。
2. 过程和函数Fortran支持模块化编程，可以将代码模块化为过程和函数。
过程是一系列执行指令的代码块，可以在程序中被多次调用。
函数是一个具有返回值的过程，可以被其他代码调用，并返回一个值。
通过过程和函数的使用，可以提高代码的重用性和可维护性。
3. 指针和动态内存分配Fortran支持指针和动态内存分配，可以在程序中灵活地操作内存。
通过指针，可以获得变量的地址，并在程序中直接操作内存。
同时，动态内存分配允许程序在运行时分配或释放内存，可用于处理不确定大小的数据。
4. 文件操作Fortran提供了丰富的文件操作功能，可以进行文件的打开、写入、读取和关闭等操作。
通过文件操作，可以将程序的输入和输出与外部文件进行交互，从而扩展程序的功能和应用范围。
5. 并行计算Fortran具有强大的并行计算能力，可以利用多核处理器和分布式计算环境实现并行计算。
通过并行计算，可以加速程序的执行速度，提高计算效率。
6. 编译和调试Fortran程序需要通过编译器进行编译，生成可执行文件。
Fortran编译器通常会检查程序的语法和语义错误，并生成可执行文件。
同时，Fortran还提供了丰富的调试工具，可以帮助程序员发现和修复程序中的错误。
7. 数值计算和科学工程计算Fortran是一种专门用于数值计算和科学工程计算的语言，提供了丰富的数学库和科学计算库。
通过这些库，可以方便地进行复杂的数值计算和科学工程计算。
总结：Fortran是一种专门用于数值计算和科学工程计算的编程语言，具有丰富的数学库和科学计算库。
FORTRAN听课笔记
FORTRAN程序是最常用的一种语言。
现在从最简单的FORTRAN程序结构整理，方便入门。
FORTRAN程序的结构是由主程序和主程序体，还有END组成的。
在解决某个问题时，可使用FORTRAN程序，其中，需要对一些变量进行定义，只有对变量进行定义了，才可以是程序顺利的运行下去。
因为，就像人一样，只有对各个部门的人进行分类，才能是人们能够井然有序的参加工作。
首先主程序的结构如下所示：PROGRAM MAIN。
END其中，PROGRAM翻译为“程序”的意思。
对于一个主程序，可以对其进行命名，比如，MAIN就是一个主程序的名字。
中间的省略号指的就是主程序的主体语句，问题的描述与解答均是位于主程序范围内。
但是，必须注意的是，一个程序，必须有结束语句，也就是END语句。
否则程序将无法正常运行。
1.变量定义的介绍：在进行编制程序的时候，首先要对问题中用到的变量进行定义。
最常用的一些变量定义有，整型变量，实型变量，字符型变量等。
就像数学中的数字定义一样，分实数、整数，所以整型变量就是定义一些表示整数的一些变量，比如说，整型变量NN，用NN表示节点的数目（Number of Nodes），因为点的数量就是整数，所以要用整型变量来定义。
用INTEGER 来表示整型变量。
例如，定义的语句可以这么写：INTEGER NN对于实型变量，用REAL表示，但是通常来说REAL的精度没有DOUBLE PRECISION 的精度高，通常使用DOUBLE PRECISION来表示实型变量。
因为REAL是8字节的，而DOUBLE PRECISION是16字节的，所以是双精度的。
因此DOUBLE PRECISION就翻译为“双精度的实型变量”。
例如，想要定义一个矩形的边长，因为边长不一定是整数，所以要定义为实型变量，则程序语句应该这么写：DOUBLE PRECISION L,H在此说明一点，就是在编写程序语句的时候，一定要在英文状态下编写，尤其是标点符号，虽然可以直接写出来，但是如果是在汉语状态下写入的标点符号，在程序运行的时候，会认为是错误，这一点一定要注意。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
FORTRAN笔记2014.10.07目录第七讲_FORTRAN的基本知识.ppt (2)FORTRAN语言程序设计初步 (2)FORTRAN源程序的书写格式（以77为例） (2)变量 (2)变量类型 (2)算术运算符和运算优先级 (3)赋值语句 (3)参数语句（PARAMETER语句） (3)END语句 (3)PAUSE语句 (3)逻辑运算和选择结构 (4)关系表达式 (4)FORTRAN中数组的定义及使用 (4)其他 (5)1. fortran语言定义CHARACTER*6 TTL(14,3),CNAM(400)是什么意思? (5)2. fortran里character*10 是什么意思 (5)3. Fortran中kind是什么函数？ (5)第七讲_FORTRAN的基本知识.pptFORTRAN语言程序设计初步FORTRAN是Formula Translation的缩写，意为“公式翻译”，它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的问题而设计的，其数值计算的功能较强。
常用的是FORTRAN77和FORTRAN90两种标准。
1、一个程序由若干个程序单位组成。
主程序和每一个子程序分别是一个独立的程序单位。
2、每一个程序单位都是以“END”结束的。
3、一个程序单位包括若干行。
1）语句行。
由一个FORTRAN语句组成。
2）非语句行，即注释行。
4、FORTRAN程序中的语句可以没有标号，也可以有标号，根据需要而定。
标号的作用是标志一个语句以便被其他语句引用。
5、一个程序单位中各类语句的位置是有一定规定的。
6、FORTRAN源程序必须按一定的格式书写。
FORTRAN源程序的书写格式（以77为例）每一行有80列，分别如下：1、第1-5列为标号区。
一行中第一列为“C”或“*”，该行即被认为是注释行。
2、第6列为“续行标志区”，如果在一行的第6列上写一个非空格和非零的字符，则该行作为其上一行的续行。
3、第7-72列为语句区。
4、第73-80列，注释区。
变量变量名：一个变量需要用一个名字（变量名）来识别。
在同一个程序单位中不能用同一个变量名代表两个不同的变量。
FORTRAN的变量名按以下规则选定：1）第一个字符必须是字母，即变量名必须以字母开头；2）在一个字母后面可以跟1-5为数字或字母。
如果选定的变量名超过6个字符，则只有前面6个字符有效。
注：在变量名中大写与小写字母是等价的。
变量类型整型变量Integer、实型变量Real、双精度变量Double Precision、复型变量Complex、逻辑型变量Logical和字符型变量Character。
1、隐含约定（I-N规则）FORTRAN规定：在程序中的变量名，凡以字母I，J，K，L，M，N六个字母开头的，即认为该变量为整型变量。
在程序中，凡是变量名以字母I,J,K,L,M,N,i,j,k,l,m,n开头的变量被默认为整型变量，以其他字母开头的变量被默认为实型变量。
2、用类型说明语句确定变量类型1）INTEGER语句（整型说明语句）2）REAL语句（实型说明语句）3）DOUBLE PRECISION语句（双精度说明语句）6）CHARACTER语句（字符型说明语句）内部数据类型分为两类：数值型（整型、实型和复型）和非数值型（字符型和逻辑型）3、用IMPLICIT语句（隐含说明语句）指定变量类型例：IMPLICIT INTEGER(A,C,T-V)注：以上三种方法中，以类型说明语句最优先，IMPLICIT语句次之，“I-N规则”的隐含约定级别最低。
类型说明只在本程序单位内有效。
IMPLICIT语句和类型说明语句应该出现在本程序单位中的所有执行语句的前面，其中，IMPLICIT语句又应在所有的类型说明语句的前面。
算术运算符和运算优先级算术运算符和运算优先级：+ 表示“加”（或正号）-表示“减”（或负号）* 表示“乘”/ 表示“除”** 表示“乘方”优先级次序：** 最高*，/ 次之+，-最低注：同类型的算术量之间运算的结果仍保持原类型。
如果参加运算的两个算术量为不同类型，则编译系统会自动将它们转换成同一类型然后进行运算。
转换的规律是：将低级类型转成高级类型。
赋值语句赋值语句的作用是将一个确定的值赋给一个变量。
其一般格式为：V=eV代表一个变量名，e代表一个表达式。
参数语句（PARAMETER语句）PARAMETER语句与赋值语句不同，它是非执行语句，在程序定义一个符号常量后，不能再改变它的值。
它应写在所有执行语句之前，符号常量的定名规则与定变量名相同。
在一个参数语句中可以定义多个符号常量。
优点：如果需要改变某一常数时，不需一一改变这个常数，只需改变参数语句中符号常量的值即可。
END语句作用：1）结束本程序单位的运行；2）作为一个程序单位的结束标志。
PAUSE语句暂停语句，在程序中假如几个PAUSE语句，即设几个“断点”，把程序分成几段，调试程序时一段一段地检查，在调试完成后再将所有的PAUSE删去。
逻辑运算和选择结构用块IF结构来实现选择结构，其形式为：IF（条件）THENthen块ELSEelse块ENDIF它的执行逻辑为：如果给定的条件成立则执行“then块”，否则，执行“else块”。
关系表达式关系表达式是最简单的一种逻辑表达式。
其形式：<算术量> <关系运算符> <算术量>关系运算符：> (.GT.) >= (.GE.)< (.LT.) <= (.LE.)= = (.EQ.) /= (.NE.)注意：1）关系运算符的两个字母的两侧各有一个句点。
2）在一个关系表达式中可能包括算术运算符和关系运算符，它们的运算次序为：先进行算术运算，然后进行关系运算。
3）关系表达式是将两个数值进行比较，这两个数值量可以是不同类型的量。
例：整型和实型。
4）关系表达式的值不是一个数值，而是一个逻辑量。
-------------------------------------------------------FORTRAN中数组的定义及使用From: 《Fortran 95 程序设计》彭国伦1.基本使用：一维数组：datatype name (size)datatype: integer, real, complex, logical,或type自定义出来的类型。
integer, parameter :: students = 5integer :: student (students)其他定义方法：integer a(10) !最简单的integer, dimension (10) :: a !另外的方法integer, dimension (10) :: a,b,c !一起定义integer a!f77 先声明a是整型，dimension a(10)！再声明a是大小为10的数组或typetype :: personreal ::height, weightend typetype (person) :: a(10)a(2)%height = 180.0二维数组：integer a(3, 3)a(1,1) = 3定义方法：integer a(10,10)integer, dimension (10, 10) :: a,b,cinteger adimension a(10,10) ! f77, 先定义类型二维数组常用来当作矩阵使用。
多维数组：fortran最多可声明高达七维的数组。
integer a(D1,D2,...,Dn) ！n维一般说来，越高维数组读数据越慢。
另类声明方法：integer a(5) 可使用的是a(1), a(2), a(3), a(4), a(5)integer a(0:5) 下标可使用的是0～5，a(0),a(1),...,a(5)六个元素。
integer a(-3：3) 可以使用的是a(-3), a(-2), a(-1), a(0),...,a(3)七个元素。
integer a (5,0:5) 可用a(1~5, 0~5)integer b(2:3, -1:3) 可用b(2~3, -1~3)其他1. fortran语言定义CHARACTER*6 TTL(14,3),CNAM(400)是什么意思?表示定义字符串，每个字符串长度是6。
一共定义两个该长度字符串的数组，一个叫TTL，二维数组，14 * 3 个元素。
另一个叫CNAM，一维数组，400个元素。
2. fortran里character*10 是什么意思就是限定最大为10个字符3. Fortran中kind是什么函数？查看变量所占内存空间的字节数。
声明整型数、浮点数变量所占用的内存字节4. bytes字节1byte有8位，可以表示一个字母、数字或符号（一个汉字占两字节）1 byte = 8 bit1 KB = 1024 bytes =210 bytes1 MB = 1024 KB = 220 bytes1 GB = 1024 MB = 230 bytes5. Fortran 声明变量（经典）大家好：我刚刚接触Fortran，看见个代码中用了dimension这个东西，我在书里翻了一下，没看到dimension可以声明变量。
请问这个是什么意思呢？谢谢！Program Main_hydrusdouble precision P,R,S,Q,RTime1,t,tInit,tOld,RTime,tMax,tAtm,! tPrint1,tAtm1,tAtm2,tAtmOld,tAtmN,tAtm2O,! TPrint,tPrintIntcharacter cFileName*260,cDataPath*260,ccname*260dimension x(NumNPD),hNew(NumNPD),hOld(NumNPD),hTemp(NumNPD)----------------------------------------------------------------------------dimension在fortran是定义数组，楼主的程序段中，dimension x(NumNPD),hNew(NumNPD),hOld(NumNPD),hTemp(NumNPD)定义了x，hNew，hOld，hTemp四个一位数组，括号内的变量代表了数组的大小。
需要注意的是在fortran中默认以a-h和o-z开头的变量为实型变量，而其他的均为整型变量，所以在这里NumNPD是一个整型变量。
例如：dimension x(100)即定义了一个容量了100的一维数组，记为x(100)，上述四个数组含义类似。