输入输出及声明
由于没有Fortran 代码块的输入,因此用PYthon代码块进行简单的说明介绍!
一. 输入(WRITE)和输出(PRINT)命令
PROGRAM ex0401 # !程序开始 ex0401 是自定义的名称
write(*,*) "hello" # !主程序代码
stop # 程序结束(这一行可以忽略)
end # 主程序代码结束
write(*,*) "Hello"
'''
*--第一个✳号代表输出的位置,通常默认为屏幕
*--第二个*号代表不特别输出格式
'''
write(UNIT=*, FMT=*) "String" # 严格的写法示例
write(UNIT=6, FMT=*) "string" # 最为严谨的写法
'''
注意点:
(1) 每执行一次write 之后,会自动换行到下一行为下一次的输出做准备
(2) 双引号是用来输出字符串的“string”, 若想输出双引号,需要连用两个双引号!(例如: " “”lalal"" ")
'''
end # 封装程序代码使用,表明主程序代码已经编译完毕
'''
三种常用的程序结束方式
'''
end
end PROGRAM
end PROGRAN ex0401
print*, "hello"
'''
1. 用法基本上与write 相同
2. ✳不用括号,且只有一个✳, 表示不限定输出格式!
3. 只能针对屏幕使用,少了赋值输出位置的功能!
'''
二. 声明
基本定义:在程序代码中,程序员向编译器要求预留一些存放数据的内存空间!
2.1 整数类型(INTEGERAL)
INTEGER a # 整型变量 a
a = 3
write(*,*) "a+2-1 = ", a # 注意:, 用来区分字符串和变量!
'''
整数类型中的长整型和短整型方式
integer(kind=4) a # For90
integer*4 a # For77
integer(4) a # For77
上述四种方式都是要用4个字节存放整数的意思,是长整型的表示方法
integer(kind=2) a # For90
integer*2 a # For77
integer(2) a # For77
上述四种方式都是要用2个字节存放整数的意思,是长整型的表示方法
'''
2.2 浮点数
不同于整数,浮点数可以保存小数部分!
real a # 占用四字节的单精度浮点数
'''
字节精度修改的方式与整数类型相似
'''
real(kind=4) a
real*4 a
real(4) a
主程序写法示例
PROGRAM ex0405
real::a
a = 2.0+1.0/3.0
write(*,*) "2.0+1.0/3.0 = ", A
end
'''
不同之处说明:
1. 声明变量类型不一样
浮点型的声明变量类型为 real 整型的声明变量类型为 integer
2. 数字表示方式不已昂
real类型中,2.0+1.0,其后带有小数点.0
integer 类型中,2+1, 其后不带小数点,仅仅是简单的表示
'''
PROGRAM EX0406
real::a
a=3.1415927
write(*,*) "sin(", a, ")", sin(a)
'''
三角函数库函数使用方法
1. 直接使用三角函数的基本表达方式就行,例如sin(a), tan(a)
2. 三角函数使用的单位是弧度,不是角度,也就是说, 弧度 = 角度*pi/180
'''
2.3复数(COMPLEX)
complex a # 复数声明方式
a = (x, y) # 表示为a = x + i*y
'''
注意到,复数是用两个数来保存的,复数也可以分为单精度和双精度
complex(kind=4) a # 单精度
complex(kind=8) b # 双精度
'''
2.4 字符串(CHARACTER)
character a # 声明字符串
character(len=10) a # 声明一个长度为10字节的字符串 a
'''
单引号与双引号的区别
'''
a = "hello!" # 可以字符串中任意使用单引号!输出双引号要连续两个双引号!
b = 'hello~ ' # 若想使用双引号,必须连续两个双引号! For77
'''
字符串的拼接!
'''
string(6) = "lallalla" # 6 表示要开始连接的位置,双引号的内容为要来连接的内容
first = "happy"
second = "day"
add = first//second # 输出结果为 “happy day”, 两个连续的斜杠 // 字符也可以连接两个字符
2.5 逻辑变量(LOGICAL)
# 声明方法
logical a, b
a = .true
b = .false
2.6 输入命令(READ)
read(*,*) a # 表示由键盘输入一个定义数据类型的a
'''
输入变量a 时,注意变量的定义类型
'''
2.7 格式化输入输出(FORMAT)
format 设置输出格式
PROGRAM ex0409
INTEGER a
a = 100
write(*, 100) a # 使用行代码为100的地方设置的格式食醋胡变量a
100 FORMAT(I4) # 100 代表代码的行号, I4 是给代码行的编号
常见的格式转换的形式说明
# 将输出形式直接写 write中
write(*, "(X1, I5)")
格式化输出一些说明
#常用的格式化输出符号 I, F, E,A, X
【Iw.m】
# I 以整数类型格式输出, w 是要输出的总宽度, m 为最小输出宽度
【Fw.d】
# F 以浮点数类型输出, w 是字符文本框输出浮点数, d 小数部分占用d 个宽度
【Ew.d[Ee]】
# E 以指数形式输出, w是输出字符所占宽度,d 是小数部分占用宽度,指数部分最少输出e个数字
【/】
# 换行输出,
write(*, "(I3//I3)") 10, 10
2.8 其他说明
'''
inplict 设置默认类型
'''
implict integer a # 以a 开头的都认为是整数类型
implict real (a-f, t) # 以a-f t 开头的都认为是浮点数
implict none # 关闭默认类型功能,所有变量都要事先声明
'''
常数的声明方法
'''
parameter (pi = 3.1415926) # 只能设置一次
real parameter::pi = 3.1415962 # 注意,pi 前面的冒号不能省略
'''
设置变量的初值
'''
integer::a = 10
real:: b = 3.0
complex :: c = (1.0, 2.0)
character(len=20):: string = "Hello Kitty!"
'''
等价声明
'''
integer a,b
equivalence(a, b) # a b 这两个变量使用同一块内存空间
'''
声明在程序中的结构
声明变量一口气完成,要放在程序执行之前,不能留到最后在定义
'''