Fortran教程第六章格式输入输出
- 格式：ppt
- 大小：104.50 KB
- 文档页数：50
下载文档原格式
合集下载
Fortran输入输出格式控制
Fortran输入输出格式控制Open, Read and Write in Fortran1：write(*,*)"string"；write(unit=*,FMT=*)"string"；write(unit=6,FMT=*)"string"。
以上等价，6是默认输出位置，即屏幕。
2：print*,"string"。
Print只能对屏幕输出。
3：integer(kind=4) a !f90；integer*4 a !f77；integer(4) a !f77。
以上等价。
real(kind=4) a !f90；real*4 a !f77；real(4) a !f77。
以上等价。
4：f77，变量名长度1~6；f90，变量名长度1~31。
5：read(*,*)"string"；write(unit=*,FMT=*)"string"；write(unit=5,FMT=*)"string"。
以上等价，5是默认输入位置，即键盘。
6：FORMAT（http://202.118.74.226/fortran/pages/730.htm）6.1 格式输出格式输出语句由两部分组成：输出语句和输出格式语句。
输出语句的一般形式为：WRITE(*,L) 输出表列或：PRINT L 输出表列其中：* 代表隐含的输出设备，L 指输出格式语句的标号。
输出格式语句的一般形式：L FORMAT(1X,S)其中：L 输出格式语句的标号，1X 纵向走纸符，S 输出格式,用不同的―格式编辑符‖（简称―编辑符‖）来实现指定的输出格式，各格式间用逗号相隔。
FORMAT语句又叫―格式语句‖，是一个非执行语句，本身不产生任何操作，只是提供输入或输出的格式。
FORMAT语句可以出现在程序的任何地方（但必须在PROGRAM语句之后和END语句之前，如果在子程序中用FORMAT语句，则应在子程序定义语句之后）。
第六讲 Fortran数据结构及输入、输出
6.1 复数型数据运算及内部函数
将参数转换为复数型。 将参数转换为复数型。
将参数转换为复数型。结
REAL(x) REAL(x) IMAG(x) IMAG(x) CONJG(x) CONJG(x)
求x的实部。 的实部。 同AIMAG(x)。 AIMAG(x)。 (x) 求x的共轭复数。 的共轭复数。
AIMAG(x) 的虚部。 AIMAG(x) 求x的虚部。
字符按先后排列成某种次序， 字符按先后排列成某种次序，每个字符在排序中有确定的位 character(len= 6) first 称为排序号 有了排序号， 排序号。 置，称为排序号。有了排序号，字符之间就可以比较大小及 character(len=10) second 相等与否，组成关系表达式。 相等与否，组成关系表达式。
6.1 字符型数据/ A(11:) 11: A(字符型数据/子字符串 -> 11
Fortran数据结构及输入 数据结构及输入、 第六讲 Fortran数据结构及输入、输出
字符型数据
字符运算符： 字符运算符：// 子字符串 运算符 内部函数 例子
program ex060202 ，系统都把本机上可以使用的各种 关系表达式:对每种机器， 关系表达式:对每种机器
end
Fortran数据结构及输入 数据结构及输入、 第六讲 Fortran数据结构及输入、输出
字符型数据
函数名 子字符串 运算符 内部函数 说明
LGE(s1,s 按 ASCII码值判定字符串 。 LGE(s1,s2 * ASCII码 码值判定字符串s ASCII 码值判定字符串 转换为对应字符。 ACHAR(n)2)将ASCII码n转换为对应字符s1 大于等于 字符串s 字符串s2。 ADJUSTL(string)* 将字符串string 左对齐, string左对齐 ADJUSTL(string)* 将字符串 string 左对齐 , 即去 掉左端空格* 按 ASCII 码值判定字符串 s1 大于字符 LGT(s1,s2 ASCII码值判定字符串 码值判定字符串s LGT(s1,s2) 串s2。 ADJUSTR(string)* 将字符串string 右对齐, string右对齐 ADJUSTR(string)* 将字符串 string 右对齐 , 即去 掉右端空格。string:CH(*),结果类型同string 结果类型同string 掉右端空格。string:CH(*),结果类型同1 小于等于 LLE(s1,s2 ASCII码值判定字符串 码值判定字符串s LLE(s1,s2)* 按 ASCII 码值判定字符串 s 字符串s ASCII码 转换为对应字符。 字符串 CHAR(n)* s2。 CHAR(n)* 将ASCII码n转换为对应字符。 IACHAR(c)* 将字符c转换为对应的ASCII码。 ASCII码 IACHAR(c)** 将字符c转换为对应的ASCII小于字符 LLT(s1,s2 ASCII码值判定字符串 码值判定字符串s LLT(s1,s2) 按 ASCII 码值判定字符串 s1 串s2。 ICHAR(c)* 将字符c转换为对应的ASCII ASCII码 ICHAR(c)* 将字符c转换为对应的ASCII码。
将参数转换为复数型。 将参数转换为复数型。
将参数转换为复数型。结
REAL(x) REAL(x) IMAG(x) IMAG(x) CONJG(x) CONJG(x)
求x的实部。 的实部。 同AIMAG(x)。 AIMAG(x)。 (x) 求x的共轭复数。 的共轭复数。
AIMAG(x) 的虚部。 AIMAG(x) 求x的虚部。
字符按先后排列成某种次序， 字符按先后排列成某种次序，每个字符在排序中有确定的位 character(len= 6) first 称为排序号 有了排序号， 排序号。 置，称为排序号。有了排序号，字符之间就可以比较大小及 character(len=10) second 相等与否，组成关系表达式。 相等与否，组成关系表达式。
6.1 字符型数据/ A(11:) 11: A(字符型数据/子字符串 -> 11
Fortran数据结构及输入 数据结构及输入、 第六讲 Fortran数据结构及输入、输出
字符型数据
字符运算符： 字符运算符：// 子字符串 运算符 内部函数 例子
program ex060202 ，系统都把本机上可以使用的各种 关系表达式:对每种机器， 关系表达式:对每种机器
end
Fortran数据结构及输入 数据结构及输入、 第六讲 Fortran数据结构及输入、输出
字符型数据
函数名 子字符串 运算符 内部函数 说明
LGE(s1,s 按 ASCII码值判定字符串 。 LGE(s1,s2 * ASCII码 码值判定字符串s ASCII 码值判定字符串 转换为对应字符。 ACHAR(n)2)将ASCII码n转换为对应字符s1 大于等于 字符串s 字符串s2。 ADJUSTL(string)* 将字符串string 左对齐, string左对齐 ADJUSTL(string)* 将字符串 string 左对齐 , 即去 掉左端空格* 按 ASCII 码值判定字符串 s1 大于字符 LGT(s1,s2 ASCII码值判定字符串 码值判定字符串s LGT(s1,s2) 串s2。 ADJUSTR(string)* 将字符串string 右对齐, string右对齐 ADJUSTR(string)* 将字符串 string 右对齐 , 即去 掉右端空格。string:CH(*),结果类型同string 结果类型同string 掉右端空格。string:CH(*),结果类型同1 小于等于 LLE(s1,s2 ASCII码值判定字符串 码值判定字符串s LLE(s1,s2)* 按 ASCII 码值判定字符串 s 字符串s ASCII码 转换为对应字符。 字符串 CHAR(n)* s2。 CHAR(n)* 将ASCII码n转换为对应字符。 IACHAR(c)* 将字符c转换为对应的ASCII码。 ASCII码 IACHAR(c)** 将字符c转换为对应的ASCII小于字符 LLT(s1,s2 ASCII码值判定字符串 码值判定字符串s LLT(s1,s2) 按 ASCII 码值判定字符串 s1 串s2。 ICHAR(c)* 将字符c转换为对应的ASCII ASCII码 ICHAR(c)* 将字符c转换为对应的ASCII码。
6 Fortran 程序设计6-文件
6 Fortran 程序设计6-文件6 Fortran 程序设计-文件6.1 引言本章将介绍如何在Fortran程序中处理文件输入和输出。
文件输入和输出是Fortran程序中常见的操作，可以用于读取外部数据、将结果写入文件等。
本章将介绍如何打开、关闭、读取和写入文件，并提供一些常用的文件操作示例。
6.2 文件的打开和关闭在Fortran中，可以使用OPEN语句打开一个文件，使用CLOSE语句关闭一个文件。
打开文件时，需要指定文件名、打开模式和文件单元号。
关闭文件时，只需要指定文件单元号即可。
6.2.1 打开文件打开文件的语法如下：OPEN(unit=, , status=status, iostat=iostat)其中，unit是文件单元号，file是文件名，status是文件的打开模式，iostat是一个可选的参数，用于返回执行结果。
status的取值有以下几种：- 'OLD'：打开一个已存在的文件，该文件必须已经存在，否则会报错。
- 'NEW'：创建一个新文件，如果文件已存在，则会清空文件内容。
- 'UNKNOWN'：打开一个已存在的文件，如果文件不存在，则会创建一个新文件。
- 'REPLACE'：创建一个新文件，如果文件已存在，则会替换原文件。
打开文件成功后，文件单元号将被用于后续的文件操作。
6.2.2 关闭文件关闭文件的语法如下：CLOSE(unit=, status=status, iostat=iostat)其中，unit是文件单元号，status是一个可选的参数，用于指定关闭文件时的操作。
status的取值有以下几种：- 'KEEP'：保留文件，不清空文件内容。
- 'DELETE'：删除文件。
文件关闭成功后，文件单元号将无法再用于文件操作。
6.3 文件的读取和写入在Fortran中，可以使用READ和WRITE语句进行文件的读取和写入操作。
fortran新建,添加外部文件和简要读写格式说明
1.建立新的运行空间File>new>workspace>new>prject>console application>new>file>free-form2.建立多个文件可以把子程序文件和主程序文件放在同一个source文件下3.建立外部文件用于读写数据Open(1,file=’ exam.txt ‘)用于打开文件，其中1为设备号——用一整数表示，exam.txt为要打开的文件名，文件有文件名和文件类型构成，文件名可给出路径如file=’ D:\exam\exam.txt ‘Write(1,*)’学生的成绩为：’用于在写在前面打开的1文件里写数据，其中*和0、5、6是系统预定义的设备号由系统隐含规定。
一个文件名只能和一个设备号建立联系，同样一个设备号也只能与一个文件建立联系，一个通过OPEN语句打开并指定了设备号的文件不能再次用OPEN语句打开Read(1,*)表示从文件里面读取数据，一次读取一个数据，数据间用逗号隔开每隔一个read语句或write语句默认的换一行读入或写入Write(1,”(‘输入’)”)=write(1,*) ‘输入’Write(1,”(‘I3,’输出’,I7)”) x,y结果是x以3个整型字符输出，输出，y以7个整型输出Read(1,100)或write(1,100)I,j,k 100 format(I3,I7,F6)表示按照100语句的格式读入或输出顺序读写数据：Read(uint设备号,fmt格式说明,end结束语句转移,eor错误语句转移)输入数据可以按规定的域宽输入，也可以用逗号强制间隔，1.使用read语句读取数据时，read语句输入表中的数据类型和格式应该与当前指针位置数据类型和格式一致。
2.使用read语句读取数据时，从当前文件指针开始读取，完成读取后文件指针自动后移一个记录，使用OPEN和REWIND语句时，文件指针指向第一个记录，从第一个记录开始读取。
Fortran程序设计：第六课 格式化输出
输出的数据不直观也不美观 所以我们要采用格式输出
INTEGER :: i DO i=1,10 WRITE (*,'(10X,A4,I2,A2,F8.6)') 'sin(',i,')=',sin(3.141593*i/180) END DO WRITE (*,*) '---------1---------2---------3---------4'
INTEGER :: i=-12,j=4,k=-12345 WRITE (*,'(2I5,I6,I10)') i,i+12,j,k WRITE (*,'(2I5.0,I6,I10.8)') i,i+12,j,k WRITE (*,'(2I5.3,I6,I5)') i,i+12,j,k WRITE (*, '(T1,A40)') '---------1---------2---------3---------4'
所以，用E表示的时候，要特别注意表示域的宽度问题，一般至少满足如下 表达式：
w≥d+7
rESw.d
实数输出----ES描述
ES描述和E描述的区别在于尾数的选取不同，ES描述是用的科学记数法，尾 数选取范围是1.0~10.0，这种表示方式更适合科研和工程人员
ES表示：±d.dddddddE ±ee 可以看出，同样宽度下，ES可以比E多一个有效位
实数输出-----F描述符
rFw.d
d表示小数点右边的位数
➢实数在其显示域内右对齐 ➢如果d值小于数据的小数位数，那么显示前会被四舍五入 ➢如果d值超出数据的小数位数，那么在小数最后补齐足够的0 ➢如果实数太大，给定的域放不下，那么用*填充
INTEGER :: i DO i=1,10 WRITE (*,'(10X,A4,I2,A2,F8.6)') 'sin(',i,')=',sin(3.141593*i/180) END DO WRITE (*,*) '---------1---------2---------3---------4'
INTEGER :: i=-12,j=4,k=-12345 WRITE (*,'(2I5,I6,I10)') i,i+12,j,k WRITE (*,'(2I5.0,I6,I10.8)') i,i+12,j,k WRITE (*,'(2I5.3,I6,I5)') i,i+12,j,k WRITE (*, '(T1,A40)') '---------1---------2---------3---------4'
所以，用E表示的时候，要特别注意表示域的宽度问题，一般至少满足如下 表达式：
w≥d+7
rESw.d
实数输出----ES描述
ES描述和E描述的区别在于尾数的选取不同，ES描述是用的科学记数法，尾 数选取范围是1.0~10.0，这种表示方式更适合科研和工程人员
ES表示：±d.dddddddE ±ee 可以看出，同样宽度下，ES可以比E多一个有效位
实数输出-----F描述符
rFw.d
d表示小数点右边的位数
➢实数在其显示域内右对齐 ➢如果d值小于数据的小数位数，那么显示前会被四舍五入 ➢如果d值超出数据的小数位数，那么在小数最后补齐足够的0 ➢如果实数太大，给定的域放不下，那么用*填充
fortran教程[技巧]
![fortran教程[技巧]](https://img.taocdn.com/s1/m/31be265dce84b9d528ea81c758f5f61fb73628ec.png)
前言FORTRAN90的新特性1、淘汰了所有转移语句，增加了新的控制结构，使程序结构化。
增加了结构块，模块及过程的调用灵活形式。
2、加强数组的算法功能。
提出超载概念与实现方法。
提高了文字处理功能。
3、更接近自然语言与公式演算。
允许在字符数据用选取不同种别。
特别：语句书写对列的要求放宽：一般一行写一条语句（也可也多个语句，用“;”分隔），没有标号区、续行区、正文区的区别。
一行最多为132列，可以在任何列处中断语句，中断处写一个“&”，随后在下一行任意列处继续。
一个语句最长不能超过2640个字符。
语句结尾不可有标号、符号。
注释以“!”开始，可以位于任何位置。
***以下只讨论与FORTRAN77不相同处。
第一章FORTRAN90的基本语句第一节类型说明语句1、变量名全长不得超过31个字符。
2、变量类型定义：INTEGER::X,YREAL::ACOMPLEX::B,C,D3、建议淘汰隐式说明，在程序说明部分一开始就写：IMPLICIT NONE向系统声明不使用隐式说明。
4、可以在变量说明时就置初值。
如：REAL::X=1.1,Y,Z=2.25、种别——决定变量的精度和所占内存单元数。
a.如：REAL(KIND=2)::X 说明变量X为REAL型，种别为2。
KIND是种别说明关键字。
如没有种别说明，则采用系统省缺值。
b.有关函数：KIND(X) 返回X的种别参数。
当X取常数0时，返回省缺种别参数。
如KI ND(0)、KIND(0.0)、KIND(.FALSE.)、KIND('A')分别返回整型、实型、逻辑型、字符型的省缺种别参数。
SELECTED_REAL_KIND(N,M) 返回种别参数，使之满足十进制有效位为N, 值范围在10**(-M)和10**M之间的实数。
SELECTED_INT_KIND(N,M) 与上类似，选择整型类别。
c.常数类别表示对数值型常数、逻辑型常数用后缀法，即在常数后加一下划线，再跟种别参数。
fortran format用法
fortran format用法1.引言1.1 概述Fortran是一种编程语言，由IBM公司于1950年代开发。
它被广泛应用于科学计算和数值分析领域，尤其在大规模计算和高性能计算方面表现出色。
Fortran语言的一个重要特性是它的格式化输出功能，即Fortran Format。
Fortran Format是一种格式控制语句，用于指定数据的输出或输入格式。
它可以精确地控制数据的显示方式，包括字段宽度、数值精度、对齐方式等。
通过使用Fortran Format，程序员可以轻松地格式化输出数据，使其更易于阅读和理解。
在Fortran程序中，可以使用一些特定的符号和代码来定义格式控制语句。
例如，可以使用A表示字符型数据、I表示整型数据、F表示浮点型数据等。
通过在格式控制语句中使用这些符号和代码，可以将不同类型和长度的数据格式化为适合打印或写入文件的形式。
除了基本的数据类型，Fortran Format还提供了许多其他功能，如控制字段宽度、指数表示法、对齐方式、填充字符等。
这些功能使得程序员能够自定义数据的输出格式，满足特定需求。
Fortran Format在科学计算和数据处理中扮演着重要的角色。
它可以帮助程序员更好地展示和共享计算结果，提高代码的可读性和可维护性。
此外，由于Fortran Format提供了丰富的格式化选项，它还可以用于数据文件的读写操作。
本文将介绍Fortran Format的基本概念和常用用法。
首先，我们将讨论Fortran Format的基本原理和语法规则。
然后，我们将探讨一些常见的格式化选项，包括字段宽度控制、数值精度控制和对齐方式控制等。
最后，我们将总结Fortran Format的重要性，并展望它在未来发展中的潜力。
通过本篇文章的阅读，读者将能够全面了解Fortran Format的用法和作用，提高对Fortran编程的理解和应用能力。
无论是初学者还是有一定经验的程序员，都可以从中获益，使其编写的Fortran程序更加出色和实用。
FORTRAN语言第6章(共8章)
F编辑符应用实例 A=2.0 B=3.14 S=A*B WRITE(*,10)A，B，S 10 FORMAT(1x,F6.2,F6.2,F6.2) Δ Δ 2.00 Δ Δ 3.14 Δ Δ 6.28 END
d大于实际需要输出的实数小数部分的位数
F编辑符应用实例 A=2.0 B=3.145 S=A*B WRITE(*,10)A，B，S 10 FORMAT(1x,F6.2,F6.2,F6.2) Δ Δ 2.00 Δ Δ 3.15 Δ Δ 6.29 END
第六讲
格式输入输出
输入输出的三种不同的格式： 1．表控格式的输入输出 按照系统隐含的标准格式在默认的I/O设备上进行I/O操作。
按照用户要求的格式在指定的I/O设备上进行数据I/O操作。 2．有格式的输入输出
3. 不管数据的具体类型，一律以二进制的形式进行I/O操作 。 无格式的输入输出
要素：
1．在什么外部设备上输入或输出
A=Δ Δ 2.00 B= Δ Δ3.14 S= Δ Δ 6.28
记录1
记录2 记录3
一个WRITE语句输出打印了三行信 息，这是由于FORMAT语句中有两 处斜杠，使之产生三个输出记录 （注意，斜杠之后也有一个“1X”， 使第二个记录的第一个字符为“空 格”，作为纵向走纸符）。
3、斜杆描述符(/)
第二节
格式说明语句
格式说明语句(FORMAT语句)是非执行语句，它只是
给输入输出语句提供数据的格式描述。在程序运行
过程中，由输入输出语句根据格式说明语句提供的 数据格式描述，实现数据的格式控制。单独的格式 说明语句在程序中不起任何作用。
格式说明语句可以放在程序单位语句(PROGRAM语句 或子程序FUNCTION或SUBROUTINE语句)之后，END语 句之前的任何位置。
Fortran数据结构及输入输出
CMPLX(x[,y][,kind]) 将参数转换为复数型。 结果:C(kind)。
DCMPLX(x[,y]) 果:C(8)。 6.1 复数型数据运算及内部函数
将参数转换为复数型。结
REAL(x) 求x的实部。
AIMAG(x) 求x的虚部。
IMAG(x) 同AIMAG(x)。
CONJG(x) 求x的共轭复数。
定义 声明1 声明2 声明3 说明
6.2 数组
数组是类型相同的组变量的有序集合。 任何一组类型相同且有序的数据都可使用数组存储。 如:保存30名学生成绩数据的一组变量：s1,s2,s3,…,s30
REAL s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,s11,s12,s13,s14,s15 这组变量可用数组s取代，数组元素s(1),s(2),…,s(15),分别取代 s1,s2,…,s15。
REAL s(15) 数组分静态数组和动态数组
静6.2 数态组/定数义 组：在编译时分配存储单元，运行时数组大小不能改变。 INTEGER num(5) !在编译时分配5个数组元素存储单元(20字节) 动态数组：在程序运行时分配存储单元，运行时数组大小可改变。 INTEGER，ALLOCATABLE :: num(:) !在编译时不分配存储单元 ALLOCATE（num(5)) !在运行时分配5个数组元素存储单元(20字节) 数组大小为数组元素个数。 数组声明有3种方式：类型声明语句、DIMENSION语句、DIMENSION属性
第六讲 Fortran数据结构及输入、输出
1. Fortran 数据结构 2. 数组 3. 数据有格式输入输出概述 4. 格式说明与格式编辑符 5. 整数有格式输入输出 6. 实数有格式输入输出 7. 复数有格式输入输出 8. 字符串有格式输入输出 9. 逻辑值有格式输入输出 10.二、八、十六进制数据有格式输入输出 11.任意类型数据有格式输入输出 12.不可重复编辑符 13.纵向走纸控制 14.有格式输入输出应用举例 15.作业
资料-+-Compaq--Visual-Fortran--6--教程
Fortran90的语言元素是指在程序设计中所用到的基本 成分，例如字符集、常量、变量、记号以及其它的基本结构等。 只有了解并掌握了这些基本要素，才可能正确自如地使用该种 语言。
2.3.1 FORTRAN90字符集：
编写Fortran90程序时，所能使用的所有字符及符号。 ⑴A~Z（a~z）程序中不区分大小写 26个 在大多数处理系统中允许使用小写字母，除了字符 串内的字符外，小写字母等价于相应的大写字母。
执行 连接
编译Leabharlann 注意： 1）所移去的文件仅从此项目中移去，目录下该文件
仍 然存在。 2）所重复的不得与以前的文件名同名。
7、下次重新修改程序时，可直接使用菜单 File/Open Workspace来打开*.dsw的工程文件。
第二章
FORTRAN语言的发展简史
§2.1 Fortran语言的发展简史
5、输入文件内容、存盘（文件菜等） 注意自由格式和固定格式输入的区别。
6、Build—Compile：编译 Build—Build： 连接 Build—Exetuce： 运行
重复3~6进行第二个源程序 （注意一个项目中只能含有1个主程序文件，不能将两个独 立的程序文件放入同一个项目中，否则会导致编译错误。） 或用DEL移去已建立的文件，重复4~6
全局名：主程序单元、外部过程、数据块、模块
2.3.2 记号
在Fortran90中，将字母、数字或专用字符的基本有效的序列称为 记号，它包括标号、关键字、名字、常数、运算符和定界符。例如：
A * SIN(x)+5.3 这个表达式包括6个记号，即A、*、SIN、x、 +、5.3。 注意：
在字符串内部，不能随意地添加空格。 在记号内部，也不许随意地使用空格。 记号与记号之间的空格可以随意地使用。 多个空格在语法上与一个空格的作用相同。 一个记号与相邻关键字、名字、常数或标号之间，应当用一个或多个 空格分开，以避免错误，同时也使结构清晰。
2.3.1 FORTRAN90字符集：
编写Fortran90程序时，所能使用的所有字符及符号。 ⑴A~Z（a~z）程序中不区分大小写 26个 在大多数处理系统中允许使用小写字母，除了字符 串内的字符外，小写字母等价于相应的大写字母。
执行 连接
编译Leabharlann 注意： 1）所移去的文件仅从此项目中移去，目录下该文件
仍 然存在。 2）所重复的不得与以前的文件名同名。
7、下次重新修改程序时，可直接使用菜单 File/Open Workspace来打开*.dsw的工程文件。
第二章
FORTRAN语言的发展简史
§2.1 Fortran语言的发展简史
5、输入文件内容、存盘（文件菜等） 注意自由格式和固定格式输入的区别。
6、Build—Compile：编译 Build—Build： 连接 Build—Exetuce： 运行
重复3~6进行第二个源程序 （注意一个项目中只能含有1个主程序文件，不能将两个独 立的程序文件放入同一个项目中，否则会导致编译错误。） 或用DEL移去已建立的文件，重复4~6
全局名：主程序单元、外部过程、数据块、模块
2.3.2 记号
在Fortran90中，将字母、数字或专用字符的基本有效的序列称为 记号，它包括标号、关键字、名字、常数、运算符和定界符。例如：
A * SIN(x)+5.3 这个表达式包括6个记号，即A、*、SIN、x、 +、5.3。 注意：
在字符串内部，不能随意地添加空格。 在记号内部，也不许随意地使用空格。 记号与记号之间的空格可以随意地使用。 多个空格在语法上与一个空格的作用相同。 一个记号与相邻关键字、名字、常数或标号之间，应当用一个或多个 空格分开，以避免错误，同时也使结构清晰。
Fortran PPT课件-(4简单的输入输出
1.6 简单的输入与输出
注意： 输入数据的个数要和输入表中变量的个 数相等； 输入字符数据时!若输入的字符串中含有 空格或逗号!则这个字符串一定要用撇号 括起来。
1.6 简单的输入与输出
表控输出语句
输出语句的形式
WRITE(unit=u,*)输出表 PRINT*，输出表 √ WRITE*，输入表 × write(unit=5,*)a,b,c = write(5,*)a,b,c write(*,*)a,b,c print*, a,b,c ! 从显示屏幕输入 u为输入设备号,*号表示表控输出,unit= 可以省略； 输出表可以是变量、数组元素名、数组名、 子串名等，它们之间用逗号分隔开。
1.6 简单的输入与输出
表控输入语句
输入语句的形式 READ(unit=u,*)输入表 READ*，输入表 read(unit=5,*)a,b,c = read(5,*)a,b,c read(*,*)a,b,ห้องสมุดไป่ตู้ ! 从键盘输入 u为输入设备号,*号表示表控输入,unit= 可以省略； 输入表可以是变量、数组元素名、数组名、 子串名等，它们之间用逗号分隔开。
fortran语言教程第6章
第6章数组应用6.1 数组与数组元素数组是由任何一种简单数据类型按照一定的组织规则构造出来的数据类型，是有序数据的集合。
数组中可以包含很多个同类型的变量，我们把这些变量叫做“数组元素”或“数组分量”或“下标变量”。
在机器中数组占用一片连续的存贮单元，每个单元都用同样的名字（即数组名）但编号不同。
数组的命名方式与简单（基本）变量命名方式相同。
假设有数组A，占据4个存储单元，元素在内存中的排列可形象表示出来：AA（1），A（2），A（3），A（4）A（1，1），A（1，2），A（2，1），A（2，2）每个单元的编号方式可以有多种，第一种用一个数字来编号称为一维数组，第二种用两个数字来编号称二维数组。
可以推广，用N个数字对数组的元素编号则称为N维数组。
数组使用之前一定要说明，事先告诉机器数组的类型，包含分量的个数，分量的编号方式等，以便机器为数组预留内存空间。
6.1.1数组的说明数组的说明应该包括以下几个方面的内容：•确定数组的名称；•确定数组元素的类型；•确定数组的结构(包括数组维数，每一维的取值范围等内容)。
说明语句的形式有：(1)类型说明语句：说明数组的类型和元素个数类型标识符数组名1 (维说明1[，维说明2，．．．])[，数组名2．．．](2)DIMENSION语句：只说明数组元素个数DIMENSION数组名1 (维说明1[，维说明2，．．．])[，数组名2．．．]其中“维说明”的形式：维下界∶维上界(或下标下界∶下标上界)例如：REAL A(1:10)，B(80:90)，C(-5:4)，NUM1(1:2,1:5)INTEGER D(0:1,0:4)，NUM2(2:5)DIMENSION S(3:5), M(1:10)说明语句中的A，B，C，D，NUM1，NUM2等都是数组名，数组名不能与本程序单位中的其他任何标识符重复。
通过“维说明”可以确定数组维数，每一维的取值范围等内容。
同一维的上下界之间用冒号分开；括号中至少要有一个维说明，也可以有多个。
fortran 简明教程
fortran 简明教程Fortran是世界上最早的高级程序设计语言之一，广泛应用于科学计算、工程和数值分析等领域。
以下是Fortran的简明教程：1. 程序结构：一个Fortran程序由不同的程序单元组成，包括主程序、子程序和模块等。
每个程序单元都以END结束。
主程序是程序的入口点，可以包含变量声明、执行语句和控制语句等。
子程序可以包含函数和子例程，用于执行特定的任务。
模块用于提供程序中的公共代码和数据。
2. 变量声明：在Fortran中，变量必须先声明后使用。
变量类型包括整数型、实数型、字符型等。
例如，声明一个整数型变量可以这样写：INTEGER :: x3. 执行语句：执行语句用于控制程序的流程和执行顺序。
Fortran提供了多种控制语句，如IF语句、DO循环、WHILE循环等。
例如，使用IF语句进行条件判断：IF (x > 0) THEN y = x x ELSE y = -x x END IF4. 输入输出：Fortran提供了基本的输入输出功能。
可以使用READ语句从标准输入读取数据，使用WRITE语句将数据输出到标准输出。
例如，读取一个实数并输出到屏幕：READ(,) x WRITE(,) x5. 数组和矩阵：Fortran支持一维和多维数组，以及矩阵运算。
例如，声明一个二维实数数组并赋值：REAL :: A(3,3) A =RESHAPE((/1,2,3,4,5,6,7,8,9/), (/3,3/))6. 子程序和模块：子程序可以用于封装特定的功能或算法，并在主程序中调用。
模块可以包含公共的函数、子例程和变量等，用于提供可重用的代码和数据。
7. 调试和优化：Fortran提供了多种调试工具和技术，如断点、单步执行、变量监视等。
还可以使用性能分析工具来检查程序的性能瓶颈并进行优化。
以上是Fortran的简明教程，希望能帮助您快速入门Fortran编程。
hh-fortran-06格式输入输出
➢ 格式输入输出语句中其它有关的格式问题:
X编辑符 H编辑符 撇号编辑符 斜扛编辑符 纵向控制符 编辑符的重复 编辑符使用的补充说明
非重复编辑描述符X编辑符
用于在输入输出的常数之间插入空格。 一般格式： nX 其中:n>0，用于指明从当前位置向右跳过n个字符位置。这 里n不能省略，即使n为1，也要写成1X。例如
COMPLEX CM READ(*,10) CM WRITE(*,20) CM 10 FORMAT(2F5.2) 20 FORMAT(1X,2F7.2) 语句执行时，从键盘输入1234567890，则输出为： □123.45□678.90
逻辑型数据编辑描述符
逻辑型数据的输入输出用L编辑符。其一般格式是：
格式说明符有以下三种形式： (1) 一个“*”，表示输出使用表控格式。前面已介绍。 (2) 一个字符常量。例如 PRINT '(1X,2F7.3)',X,Y (3) 是格式语句(FORMAT)的语句标号。最常用。
例如： PRINT 100,A,B,C
100 FORMAT(1X,F9.4,2F7.3) 格式编辑符：
10 FORMAT(1X,A7,A8) 输出为： FORTRAN□PROGRAM
编辑描述符总结
FORTRAN 90提供的编辑描述符很多，掌握共同 特点就不难了。
可重复编辑描述符是用来决定对应输入输出项的 输入输出格式的，其中都有字段宽度w，而且对于 输入都是从输入记录中取w个字符，对于输出都是 在输出记录中输出w个字符。
编辑描述符总结
问题：如何记忆？ ➢在输入时，取得的w个字符按什么规则加工后传送 到对应的输入项。 ➢在输出时，当输出项实际包括的字符的个数和编 辑符中所确定的字段宽度(对于数值型数据还有小数 位数)之间不相符时，如何输出? ➢可分数值型、逻辑型、字符型进行总结。
X编辑符 H编辑符 撇号编辑符 斜扛编辑符 纵向控制符 编辑符的重复 编辑符使用的补充说明
非重复编辑描述符X编辑符
用于在输入输出的常数之间插入空格。 一般格式： nX 其中:n>0，用于指明从当前位置向右跳过n个字符位置。这 里n不能省略，即使n为1，也要写成1X。例如
COMPLEX CM READ(*,10) CM WRITE(*,20) CM 10 FORMAT(2F5.2) 20 FORMAT(1X,2F7.2) 语句执行时，从键盘输入1234567890，则输出为： □123.45□678.90
逻辑型数据编辑描述符
逻辑型数据的输入输出用L编辑符。其一般格式是：
格式说明符有以下三种形式： (1) 一个“*”，表示输出使用表控格式。前面已介绍。 (2) 一个字符常量。例如 PRINT '(1X,2F7.3)',X,Y (3) 是格式语句(FORMAT)的语句标号。最常用。
例如： PRINT 100,A,B,C
100 FORMAT(1X,F9.4,2F7.3) 格式编辑符：
10 FORMAT(1X,A7,A8) 输出为： FORTRAN□PROGRAM
编辑描述符总结
FORTRAN 90提供的编辑描述符很多，掌握共同 特点就不难了。
可重复编辑描述符是用来决定对应输入输出项的 输入输出格式的，其中都有字段宽度w，而且对于 输入都是从输入记录中取w个字符，对于输出都是 在输出记录中输出w个字符。
编辑描述符总结
问题：如何记忆？ ➢在输入时，取得的w个字符按什么规则加工后传送 到对应的输入项。 ➢在输出时，当输出项实际包括的字符的个数和编 辑符中所确定的字段宽度(对于数值型数据还有小数 位数)之间不相符时，如何输出? ➢可分数值型、逻辑型、字符型进行总结。
Fortran教程第六章格式输入输出
当输入的是指数形式时，如果E前面的数字部分含有小数
点，则d不起作用。如果数字部分不含有小数点，则自动 按d决定数字部分小数点的位置。 例如 READ(*,10)A,B 10 FORMAT(F8.0,F7.2) 执行语句时，如从键盘输入72.48E-3□□□□2E2，则A、 B的值分别为0.07248、2.0。
6.3 格式说明语句
FORTRAN用专门的格式说明来描述输入输出的格式。 尽管格式说明可以直接放在输入输出语句中，但为了使
程序的可读性更强，最好使用格式说明语句来进行格式
说明。格式说明语句的一般格式是： n FORMAT(格式说明)
其中n是语句标号，FORMAT语句一定带有语句标号， 以便同格式输入输出语句配合使用。格式说明由若干个
编辑描述符组成，编辑描述符之间用逗号分隔。例如
10 FORMAT(1X,I4,F5.1)
格式说明语句是非执行语句，它只是给输入输出语句提
供数据的格式描述。在程序运行过程中，由输入输出语句根 据格式说明语句提供的数据格式描述，实现数据的格式控制。 单独的格式说明语句在程序中不器任何作用。例如 10 FORMAT(1X,I4,F5.1)
6.4常用的编辑描述符 编辑描述符分成两大类： 可重复编辑描述符
非重复编辑描述符。 6.4.1 可重复编辑描述符 可重复编辑描述符是用来编辑输入输出项的输入输出格 式的，所以它们总是与输入输出项相对应。不同类型的输入 输出项使用不同的编辑描述符。FORTRAN提供的内部数据
类型有整型、实型、复型、字符型和逻辑型。相应地，编辑
第六章 格式输入输出
6.1 输入输出概述 6.2 格式输入输出语句 6.3 格式说明语句 6.4常用的编辑描述符 6.5 输入输出项与编辑符的相互作用
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
10 FORMAT(1X,I4,F5.1) WRITE(*,10) 2345,67.8
格式说明包含3种编辑描述符X,I和F。分别用I4和F5.1来控制 2345和67.8的输出格式，1X也有特定的用途。 格式说明语句可以放在程序单位语句(主程序语句 PROGRAM ， 子 程 序 语 句 FUNCTION 或 SUBROUTINE) 之 后，END语句之前的任何位置。
n FORMAT(格式说明)
其中n是语句标号，FORMAT语句一定带有语句标号， 以便同格式输入输出语句配合使用。格式说明由若干个 编辑描述符组成，编辑描述符之间用逗号分隔。例如
10 FORMAT(1X,I4,F5.1)
格式说明语句是非执行语句，它只是给输入输出语句提 供数据的格式描述。在程序运行过程中，由输入输出语句根 据格式说明语句提供的数据格式描述，实现数据的格式控制。 单独的格式说明语句在程序中不器任何作用。例如
输入项指定了输入的具体内容。输入项目可以变量，不允许 是常量或表达式。此外，输入项目也可以是隐含DO循环
6.3 格式说明语句
FORTRAN用专门的格式说明来描述输入输出的格式。 尽管格式说明可以直接放在输入输出语句中，但为了使 程序的可读性更强，最好使用格式说明语句来进行格式 说明。格式说明语句的一般格式是：
WRITE(*,10) J END DO 10 FORMAT(1X,3I5) END
程序输出为： 1 3 5
每循环一次输出循环变量J的值，每个数据占5格
再看下面的例子。
INTEGER J WRITE(*,10) (J,J=1,5,2) 10 FORMAT(1X,3I5) END
程序输出为： 135 程序中，WRITE语句的输出项“(J,J=1,5,2)”是一个隐含的 DO循环，当作一个整体输出，每个数据占5格。
READ(*,'(I3,2I4)') I,J,K (3)格式说明符是格式语句(FORMAT)的语句标号。这是最常用 的格式输入形式。
u是设备号，用于指明具体使用的输入设备。u可以是一个无 符号整常量，也可以是一个整型变量或整型表达式，还可以是 星号“*”。 “*”表示由计算机系统预先约定的外部设备，一 般为键盘。
6.2 格式输入输出语句
6.2.1 格式输出
格式输出语句有两个：PRINT语句和WRITE语句。 1．PRINT语句 PRINT语句的一般格式是：
PRINT f, 输出项 其中f是格式说明符，指明了输出所用的格式。它有以下 三种形式：
(1)格式说明符是一个“*”，表示输出使用表控格式。 (2)格式说明符是一个字符常量。例如
输入输出的格式由格式编辑符来指定，不同的数据类型需要不 同的格式编辑符，不同的格式编辑符确定不同的输入输出格式。
输入输出的具体内容即输入输出项，输入项只能为变量，输 出项可以为常量、变量、函数和表达式，也可以是隐含的DO循环。 下面先看一个格式输入输出的例子。
INTEGER J DO J=1,5,2
(1) 通过什么设备来进行输入输出。 (2) 采用什么样的格式来进行输入输出。 (3) 输入输出的具体内容。
每一种计算机系统都隐含指定一种输入设备和输出设备。在微 机中，隐含指定键盘为输入设备，显示器为输出设备。在输入输出 数据较多时，也可以使用磁盘作为输入输出设备，即从已经建立的 磁盘文件中去读取数据，将处理结果写入到磁盘文件中去。关于文 件操作将在第11章介绍。
输出项也可以是常量、变量、函数以及表达式，还可以 是隐含的DO循环。
6.2.2格式输入
格式输入语句是指READ语句，它有两种形式： READ f,输入项 READ (u,f) 输入项
其中f指明了输入所用的格式。它有以下三种形式：
(1)格式说明符是一个“*”，表示输入使用表控格式。 (2)格式说明符是一个字符常量。例如
6.4常用的编辑描述符
编辑描述符分成两大类： 可重复编辑描述符 非重复编辑描述符。
6.4.1 可重复编辑描述符
可重复编辑描述符是用来编辑输入输出项的输入输出格 式的，所以它们总是与输入输出项相对应。不同类型的输入 输出项使用不同的编辑描述符。FORTRAN提供的内部数据 类型有整型、实型、复型、字符型和逻辑型。相应地，编辑 描述符也分五类介绍。
第六章 格式输入输出
6.1 输入输出概述 6.2 格式输入输出语句 6.3 格式说明语句 6.4常用的编辑描述符 6.5 输入输出项与编辑符的相互作用
6.1 输入输出概述
输入输出是指在计算机内存与外部设备之间传送数据的过程。从 外部设备将数据传送到计算机内存称为输入。将计算机内部的数据传 送到外部设备称为输出。要顺利地传送数据，一般应在输入输出语句 中给计算机提供三方面的信息：
2. WRITE语句
WRITE语句的一般格式是：
WRITE(u, f) 输出项
其中u是设备号，用于指明具体使用的输入输出设备。u可 以是一个无符号整常量，也可以是一个整型变量或整型表 达式，还可以是星号*。*表示由计算机系统预先约定的外 部设备，一般为显示器。
f 是格式说明符，指明了输入输出所用的格式。它也有 三种形式，用法与PRINT语句相同。
PRINT '(1X,2F7.3)',X,Y (3)格式说明符是格式语句(FORMAT)的语句标号。这是最常 用的格式输出形式。例如
PRINT 100,A,B,C 100 FORMAT(1X,F9.4,2F7.3) 输出项指定了输出的具体内容。输出项可以是变量、常量、 函数以及表达式。此外，输出项还可以是隐含DO循环。
rIw 其中r是重复系数，为1时可以省略。w表示字段宽度，即 与该编辑描述符对应的输入输出项所占用的字符个数。 I型输入的使用规则：在输入记录中从左往右取w个字符 存入对应的输入项。注意取得的w个字符必须是整数，正负号 也占一个字符位置，空格字符占一个字符位置但不起作用。
1. 整型数据编辑描述符
根据数据采用的进制不同，整型数据编辑符分为四 种，I编辑符、B编辑符、O编辑符和Z编辑符。I编辑 符用来描述十进制的整型数据，B编辑符用来描述二进 制的整型数据，O编辑符用来描述八进制的整型数据， Z编辑符用来描述十六进制的整型数据。下面逐一介绍。
(1) I编辑符。十进制整数的输入输出。 一般格式是：
格式说明包含3种编辑描述符X,I和F。分别用I4和F5.1来控制 2345和67.8的输出格式，1X也有特定的用途。 格式说明语句可以放在程序单位语句(主程序语句 PROGRAM ， 子 程 序 语 句 FUNCTION 或 SUBROUTINE) 之 后，END语句之前的任何位置。
n FORMAT(格式说明)
其中n是语句标号，FORMAT语句一定带有语句标号， 以便同格式输入输出语句配合使用。格式说明由若干个 编辑描述符组成，编辑描述符之间用逗号分隔。例如
10 FORMAT(1X,I4,F5.1)
格式说明语句是非执行语句，它只是给输入输出语句提 供数据的格式描述。在程序运行过程中，由输入输出语句根 据格式说明语句提供的数据格式描述，实现数据的格式控制。 单独的格式说明语句在程序中不器任何作用。例如
输入项指定了输入的具体内容。输入项目可以变量，不允许 是常量或表达式。此外，输入项目也可以是隐含DO循环
6.3 格式说明语句
FORTRAN用专门的格式说明来描述输入输出的格式。 尽管格式说明可以直接放在输入输出语句中，但为了使 程序的可读性更强，最好使用格式说明语句来进行格式 说明。格式说明语句的一般格式是：
WRITE(*,10) J END DO 10 FORMAT(1X,3I5) END
程序输出为： 1 3 5
每循环一次输出循环变量J的值，每个数据占5格
再看下面的例子。
INTEGER J WRITE(*,10) (J,J=1,5,2) 10 FORMAT(1X,3I5) END
程序输出为： 135 程序中，WRITE语句的输出项“(J,J=1,5,2)”是一个隐含的 DO循环，当作一个整体输出，每个数据占5格。
READ(*,'(I3,2I4)') I,J,K (3)格式说明符是格式语句(FORMAT)的语句标号。这是最常用 的格式输入形式。
u是设备号，用于指明具体使用的输入设备。u可以是一个无 符号整常量，也可以是一个整型变量或整型表达式，还可以是 星号“*”。 “*”表示由计算机系统预先约定的外部设备，一 般为键盘。
6.2 格式输入输出语句
6.2.1 格式输出
格式输出语句有两个：PRINT语句和WRITE语句。 1．PRINT语句 PRINT语句的一般格式是：
PRINT f, 输出项 其中f是格式说明符，指明了输出所用的格式。它有以下 三种形式：
(1)格式说明符是一个“*”，表示输出使用表控格式。 (2)格式说明符是一个字符常量。例如
输入输出的格式由格式编辑符来指定，不同的数据类型需要不 同的格式编辑符，不同的格式编辑符确定不同的输入输出格式。
输入输出的具体内容即输入输出项，输入项只能为变量，输 出项可以为常量、变量、函数和表达式，也可以是隐含的DO循环。 下面先看一个格式输入输出的例子。
INTEGER J DO J=1,5,2
(1) 通过什么设备来进行输入输出。 (2) 采用什么样的格式来进行输入输出。 (3) 输入输出的具体内容。
每一种计算机系统都隐含指定一种输入设备和输出设备。在微 机中，隐含指定键盘为输入设备，显示器为输出设备。在输入输出 数据较多时，也可以使用磁盘作为输入输出设备，即从已经建立的 磁盘文件中去读取数据，将处理结果写入到磁盘文件中去。关于文 件操作将在第11章介绍。
输出项也可以是常量、变量、函数以及表达式，还可以 是隐含的DO循环。
6.2.2格式输入
格式输入语句是指READ语句，它有两种形式： READ f,输入项 READ (u,f) 输入项
其中f指明了输入所用的格式。它有以下三种形式：
(1)格式说明符是一个“*”，表示输入使用表控格式。 (2)格式说明符是一个字符常量。例如
6.4常用的编辑描述符
编辑描述符分成两大类： 可重复编辑描述符 非重复编辑描述符。
6.4.1 可重复编辑描述符
可重复编辑描述符是用来编辑输入输出项的输入输出格 式的，所以它们总是与输入输出项相对应。不同类型的输入 输出项使用不同的编辑描述符。FORTRAN提供的内部数据 类型有整型、实型、复型、字符型和逻辑型。相应地，编辑 描述符也分五类介绍。
第六章 格式输入输出
6.1 输入输出概述 6.2 格式输入输出语句 6.3 格式说明语句 6.4常用的编辑描述符 6.5 输入输出项与编辑符的相互作用
6.1 输入输出概述
输入输出是指在计算机内存与外部设备之间传送数据的过程。从 外部设备将数据传送到计算机内存称为输入。将计算机内部的数据传 送到外部设备称为输出。要顺利地传送数据，一般应在输入输出语句 中给计算机提供三方面的信息：
2. WRITE语句
WRITE语句的一般格式是：
WRITE(u, f) 输出项
其中u是设备号，用于指明具体使用的输入输出设备。u可 以是一个无符号整常量，也可以是一个整型变量或整型表 达式，还可以是星号*。*表示由计算机系统预先约定的外 部设备，一般为显示器。
f 是格式说明符，指明了输入输出所用的格式。它也有 三种形式，用法与PRINT语句相同。
PRINT '(1X,2F7.3)',X,Y (3)格式说明符是格式语句(FORMAT)的语句标号。这是最常 用的格式输出形式。例如
PRINT 100,A,B,C 100 FORMAT(1X,F9.4,2F7.3) 输出项指定了输出的具体内容。输出项可以是变量、常量、 函数以及表达式。此外，输出项还可以是隐含DO循环。
rIw 其中r是重复系数，为1时可以省略。w表示字段宽度，即 与该编辑描述符对应的输入输出项所占用的字符个数。 I型输入的使用规则：在输入记录中从左往右取w个字符 存入对应的输入项。注意取得的w个字符必须是整数，正负号 也占一个字符位置，空格字符占一个字符位置但不起作用。
1. 整型数据编辑描述符
根据数据采用的进制不同，整型数据编辑符分为四 种，I编辑符、B编辑符、O编辑符和Z编辑符。I编辑 符用来描述十进制的整型数据，B编辑符用来描述二进 制的整型数据，O编辑符用来描述八进制的整型数据， Z编辑符用来描述十六进制的整型数据。下面逐一介绍。
(1) I编辑符。十进制整数的输入输出。 一般格式是：