Fortran中的输入输出!!!

来源:互联网 发布:黑龙江省快乐十分软件 编辑:程序博客网 时间:2024/06/08 02:26

我们学习计算机语言的目的在于与计算机进行交互
(输入即向计算机发送指令,输出即计算机对我们发送的指令做出的响应),
所以交互的前提首先要搞清编程语言的输入输出

输入输出方法有:write print read
我们需要在输入输出语句中提供三方面的信息:
1)通过什么设备进行输入输出
2)采用的输入输出格式
3)输入输出的具体内容

program mainimplicit none! !!!!!注意本例中的!号为注释内容! 这两个语句,声明了两个integer变量和一个real变量integer(kind = 4) :: A = 23, B = 14real(kind = 4) :: C = 4.5! 普通输入输出,*号代表采用默认格式,又叫表控格式print *,  A, B, C! 格式化输入输出,采用标号100定义的格式print 100, A, B, C100 format(1x, 2I4, F7.3)! 或者print '(1x, 2I4, F7.3)', A, B, C! ------------------------分割线-------------------------! print 只能输出到屏幕,而如果想要输出到文件可以使用write !-格式:write(u, f) 输出项!- u:表示设备号,指明输入输出设备,默认*或标号6为屏幕!- f:表示格式说明符 如上所述100!------------输入语句readwrite类似------------!-格式read(u, f) 输出项!- u:表示设备号,指明输入输出设备,默认*号为屏幕!- f:表示格式说明符 如上所述100write(6, *) A, B, Cwrite(*, '(1x, 2I4, F7.3)') A, B, C! 下面这一句把ABC输出到代号为80的文件,如果没有打开此文件!,会默认创建文件名为fort.80的文件write(80, '(1x, 2I4, F7.3)') A, B, C! ------------------------分割线! 输入,带格式的输入比较苛刻,可以自行试验read(*, *) A, B, C! ------------------------分割线-------------------------! 上面我们用到了一些格式化输出! 接下来介绍一下格式化描述符的意义!1. 整数编辑描述符IO!   I用于十进制整数的输入输出, 格式:rIw  r:重复的系数 w:字段宽度print '(1x, 2I4, F7.3)', A, B, C  ! 2I4对应后面A B两个整数变量,宽度各为4print '(1x, I4, I4, F7.3)', A, B, C ! 展开形式!2. 实型数据编辑描述符F, E, G等(与整型用法类似) 格式rFw.d d为输入输出的小数位数!如果宽度w不够,输出以*号代替!!3. 字符型编辑符Aprint '(2a)', 'hello fortran!', 'I am ADreamClusive!'! 上面的输出    hello fortran!I am ADreamClusive!  ! 两个字符串紧紧连在一起,可读性不好,也不好看!3. X编辑符! 用于在输入输出数据之间插入空格print '(a, 2X, a)', 'hello fortran!', 'I am ADreamClusive!'! 输出内容   hello fortran!  I am ADreamClusive!! 这样就比上边的格式舒服了很多! ------------------------分割线-------------------------! 当然,在格式中可以有字符串的输入输出print '("lili:      ", a)', 'hello fortran!'print '("fortran:   ", a)', 'I am ADreamClusive!'! 斜杠编辑符print '("lili:      ", a/"fortran:   ",a)', 'hello fortran!', 'I am ADreamClusive!'! 比较老的方式:H编辑符号write(*, 200) A, B, C200 format(1x, 2HA= , I3, 2HB= , I3, 2HC= , F5.2)end program
0 0