基本的なFortranプログラム(open、close,read文)

1.open文、close文

ファイルを開く際に『open』、ファイルを閉じる際に『close』を使用する。

open (ファイル番号,file='ファイル名')     !ファイルを開く
close(ファイル番号)     !ファイルを閉じる

open文、close文を使ったプログラムの例

model.txtファイルを作成してk=10を保存、ファイルを閉じる。

program zerofortran
implicit none
integer k
k=10

open (10,file='model.txt')     !ファイルを作成してk=10を読み込む
write(10,*) k
close(10)     !ファイルを閉じる

end program zerofortran

2.read文

『read』でファイル内の数値を読み込む。

read(ファイル番号,*) k,s,t,u    !複数の要素を読み込むには『,』で区切る

read文を使ったプログラムの例

model.txtファイルからkの値を読み込み、出力する。

program zerofortran
implicit none
integer k

open (10,file='model.txt')
read(10,*) k     !ファイル内の数値を読み込む
close(10)

write(*,*) 'k=',k

end program zerofortran

k= 10

コメント