円の面積や球体の面積などを求めるプログラムを以下の通りに作りました。
FORTRAN
1 program enntokyuu 2 implicit none 3 real(8) r,sl,sv,bv,bs !半径と円周の長さ、円の面積、球の面積、球の表面積 4 !倍精度実数 5 6 write(*, *)'r=' !rの入力 7 read(*, *) r 8 write(*, *)'sl=' !slの入力 9 read(*, *) sl 10 write(*, *) 'sv=' !svの入力 11 read(*, *) sv 12 write(*, *) 'bv=' !bvの入力 13 read(*, *) bv 14 write(*, *) 'bs=' !bsの入力 15 read(*, *) bs 16 17 sl = 2 * 3.14159265359 * r !円周の長さ 18 sv = 3.14159265359 * r * r !円の面積 19 bv = ( 4 * 3.14159265359 * r * r * r ) /3 !球の体積 20 bs = 4 * 3.14159265359 * r * r !球の表面積 21 22 write(*,*)'円周の長さ=',sl 23 write(*,*)'円の面積=',sv 24 write(*,*)'球の体積=',bv 25 write(*,*)'球の表面積=',bs 26 27 end program enntokyuu 28
するとエラー画面が出てきました。
FORTRAN
1 2C:\fortran>gfortran enntokyuu.f90 -o enntokyuu.exe 3enntokyuu.f90:1:8: 4 5 program enntokyuu 6 1 7Error: Invalid form of PROGRAM statement at (1) 8enntokyuu.f90:27:13: 9 10 end program enntokyuu 11 1 12Error: Expected terminating name at (1) 13f951.exe: Error: Unexpected end of file in 'enntokyuu.f90' 14
programファイル名とend program ファイル名
でちゃんとくくっているのにエラーが出てきます。
どのようにしたら、エラーが取れるでしょうか。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2017/05/28 06:23
2017/05/28 06:24
2017/05/28 06:28
2017/05/28 06:43
2017/05/28 06:47
2017/05/28 07:08