fortran - 读取 Fortran 77 中的行并将字符串转换为数字

Question

我有一个如下所示的文本文件：

7000
1.54
-0.32

我想做的是逐行读取文件，并将每个数字分配给一个数值变量。数字总是有 3 行，但我不知道数字的长度。它们可能是整数、浮点数、负数。我怎样才能做到这一点？

对于 Fortran 77。是的，我知道。但这不是我使用它的要求。

Answer 1

这是为了读取您的文件：

integer :: i
real    :: a, b

open( file='filename.txt', unit=1234, status='old' )
read(1234,*) i
read(1234,*) a
read(1234,*) b
close(1234)

这是为了将字符串转换为real使用内部 I/O：

character(len=10) :: str = '1.23e1'
real    :: a

read(str,*) a