FORTRAN



FORTRAN

Intro
Feature
Annotation
Basic-Syntax
Data-Type

boolean
integer
real
complex
character
dimension


Expression

operator

arithmetic
logical
relational




Statement

if
loop
jump
function


INPUT
OUTPUT









Intro

FORTRAN诞生于1954年，为美国著名的计算机先驱人物约翰·巴克斯所开发。 

是世界上第一种计算机高级语言，为现代软件开发奠定了基础。

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

主要标准版本有F77、F90、F95。 

编译器有ifort、gfortran、G95。

FORTRAN不同版本区别较大，下面以F90为标准



Feature


F77受卡片机72列的影响，所以Fortran一行只允许最多72列，且头6列有特殊意义，包括语句标号
implicit: IJKLMN as INTEGER
strong-type
dimension


Annotation

最初标准以第一列为C或者*表示为注释行 

后来以!为注释符



Basic-Syntax



program program_name
implicit none      

! const
real, parameter :: pi = 3.1415927

! type declaration statements
<Data-Type> :: <var1>,<var2>...

! executable statements  

end program program_name



Data-Type



boolean


logical(.true.  .false.)




integer


integer




real


real
double precision




complex


complex (a,b) as (a+bi)
double precision complex




character


character (len=n)




dimension


, dimension(m[,n]) :: var




Expression



<unary> <rvalue>;
<lvalue> <binary> <rvalue>;



operator



arithmetic


+
-
*
/
**




logical


.and.
.or.
.not.




relational


.eq. as ==
.ne. as /=
.lt. as <
.gt. as >
.le. as <=
.ge. as >=




Statement



if



if (exp1) then
    <statement1>
else if (exp2) then
    <statement2>
else
    <statement3>
end if



select case (exp)
    case value1
        statement1
    case value2
        statement2
    ...
    case default
        statement
end select



loop



do i=begin,end [,step]
    statements
end do



do while (exp)
    statements
end do



jump



goto S
goto (S1,S2...),I
cycle ! like c continue
exit  ! like c break



function



subroutine sub_name(params)
    statements
    return
end subroutine

function func_name(params)
    statements
    call sub_name(...)
    return
end function



INPUT



read fmt, variable_list  



OUTPUT



print fmt, variable_list 
write fmt, variable_list

@Fortran代码

怎么用Fortran求解有无穷解的线性方程组

FORTRAN 基本知识学习
关于软件安装
0. 字符集
1. 书面格式
1.1 Fixed Format
1.2 Free Format
2. 数据类型
2.1 整数（INTEGER）
2.2 浮点数（REAL）
2.3 复数（COMPLEX）
2.4 字符（CHARACTER）
2.5 逻辑判断（LOGICAL）
3. 数学表达式

关于软件安装
1、使用工具：VS+Fortran
2、具体软件以及下载地址
	(1) Visual studio 2019 
	网上都有链接！进官网过去一般都能下载！
	下载链接： https://visualstudio.microsoft.com/zh-hans/downloads/
    (2) inter  XE parallel studio fortran
    链接：https://pan.baidu.com/s/10EfPVcYg_K-4bMZ2h2SoOg 
	提取码：99tc 
    
切记！！！ 先安装VS2019，在安装Fortran。 

0. 字符集
要求     | 内容

-------- | -----

英文26字母  | A-Z， a-z

数字  | 0-9

22特殊字符  | : = + * / ()  ~~~
注意点：Fortran 不区分大小写！
1. 书面格式
Free Format （自由格式）   *.F90 建议使用格式！

Fixed Format （固定格式）  *.F  /  *.For
1.1 Fixed Format
| 第 1 个字符   | C c  *----  这一行被当作注释，不会被编译      |
| 第1--5 个字符 | 数字----  代码行代号，不然只能是空格      |
| 第 6 个字符   | 0以外的字符，表示这一行是接上一行继续    |
| 第7--72个字符 | 代码编写区域      
| 第 73 个字符  | 不使用，超过部分被忽略

使用这种形式是为了配合早期使用卡片输入程序发明的格式！
1.2 Free Format
格式比较自由，但是有几个注意点！

（1）“！”后面文本基本上都是注释

（2）每行可以编写123个字符

（3）行号放在每行程序的最前面

（4）& 代表该行程序与上一行相连接！
2. 数据类型
2.1 整数（INTEGER）
2.2 浮点数（REAL）
2.3 复数（COMPLEX）
2.4 字符（CHARACTER）
2.5 逻辑判断（LOGICAL）
3. 数学表达式
程序语言所使用的基本用法，都是在其中有用到！

+， -， *， / , **