read语句第一个参数是文件号(包括外部文件-(真正的文件、设备)或内部文件(字符串)),第二个参数是格式说明,是一个字符串。
write (ifmt,'(''('',i3,''a1)'')') nyl
是把ny1按照指定的格式写到字符串ifmt中,fortran中单引号'是字符串界定符号,需要使用两个单引号''表示一个单引号类似C的read
(ly,ifmt) (iplt(ixylr(1,1)-12,j),j=i nyl-1,i,-1)
是把后面的数据按找ifmt格式(前面的语句构造的字符串)写到字符串ly中。
扩展资料:
Fortran语言的最大特性是接近数学公式的自然描述,在计算机里具有很高的执行效率。
易学,语法严谨。
可以直接对矩阵和复数进行运算,这一点类似MATLAB。
FORTRANⅣ(即FORTRAN 66)流行了十几年,几乎统治了所有的数值计算领域,许多应用程序和程序库都是用FORTRANⅣ语言编写的。
美国标准化协会(ANSI)在1976年对ANSI FORTRAN(X3.9-1966)进行了修订,预定在1977年通过,为了区别于FORTRAN 66,新标准定名为FORTRAN 77。实际上到1978年4月才由ANSI正式公布作为新的美国国家标准。即FORTRAN(X3.9-1978)。
1980年,FORTRAN 77被接受为国际标准,即《程序设计语言FORTRAN ISO 1539-1980》,该标准分为全集和子集。
参考资料来源:百度百科-FORTRAN语言
推荐于2017-09-26
READ(2,*)A,B,C表示从代号为2的文件中以默认的方式(后面的“*”表示默认的方式/格式)来依次读取三个值赋给变量A,B,C。
要问2代表的是哪个文件?在稍前面的代码里找找看OPEN语句,大概应该是这个样子的:
OPEN(2,FILE="……")
双引号里的省略号就是2所代表的文件的文件名,也就是数据文件名了。
当然这个OPEN语句可能更详细一点,如:
OPEN(UNIT=2,FILE="……")
或者:
OPEN(UNIT=2,FILE="……",其它参数)
意思都差不多的。
有不清楚的,请补充问题。
write (ifmt,'(''('',i3,''a1)'')') nyl
是把ny1按照指定的格式写到字符串ifmt中,fortran中单引号'是字符串界定符号,需要使用两个单引号''表示一个单引号类似C的read
(ly,ifmt) (iplt(ixylr(1,1)-12,j),j=i nyl-1,i,-1)
是把后面的数据按找ifmt格式(前面的语句构造的字符串)写到字符串ly中