1

次のようなテキストファイルがあります。

7000
1.54
-0.32

私がやりたいことは、ファイルから行ごとに読み取り、各数値を数値変数に割り当てることです。数字は常に 3 行あるのですが、数字の長さがわかりません。整数、浮動小数点数、負数の場合があります。どうすればこれを達成できますか?

Fortran 77 の場合も同様です。しかし、それを使用するのは私の呼びかけではありません。

4

1 に答える 1

2

これは、ファイルを読み取るためのものです。

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
于 2013-09-26T13:21:23.473 に答える