くだすれFORTRAN（超初心者用）その6

10 ：デフォルトの名無しさん：2012/08/17(金) 21:38:35.93 .net

write(*,'(a,$)') 'File Name : '
read(*,'(a)') filenm
open(14,file=filenm)

write(*,*) 'result=', s ! <--だから結果を書きだせってｗ

close(14)