FORTRAN 输入输出 from《Fortran95 程序设计》

最新推荐文章于 2024-04-26 14:06:27 发布

qlj061001

最新推荐文章于 2024-04-26 14:06:27 发布

阅读量1.5k

点赞数

分类专栏： FORTRAN语言

8 篇文章 6 订阅

订阅专栏

输出例子：

      PROGRAM EX04220
      INTEGER A
      A=1000
      WRITE(*,100) A
100   FORMAT(I4)
      END

100 FORMA(I4) 是格式化输出，常用的格式化输出包括：

Aw 字符串，w个字符来输出； Iw[.m] w个宽度输出整数，最少输出m个数字；

Ew.d 用指数形式输出浮点数，小数部分占d个宽度，同样可以用 Dw.d 两者差别在于有的编译器再输出双精度时要求用Dw；

Fw.d 输出浮点数，其中d个宽度的小数；nX 输出的位置向右跳过n个位置。

当然上面的例子同样可以改写成

  WRITE(*,"(I4)") A     或者

      FMTSTRING="(I4)"
      WRITE(*,FMTSTRING) A

WRITE 与PRINT的用法相似，只是在使用PRINT只能向屏幕输出，例如  PRINT "(A10)","Hello" ! 直接把个数字符串放在语句中

输入的例子：

    PROGRAM EX0412
    CHARACTER(LEN=80) STRING
    READ(*,"(A80)") STRING
    WRITE(*,"(A80)") STRING
    END

这个例子可以读入字符长度小于80的字符串，可以包含空格或者逗号等字符，特别注意当读入例如"Hello,World"这样带有逗号的字符串时，一定要给定输入格式，否则会把字符串按照逗号拆开Hello和Word两部分。

关注