Question

fortran程序中 怎样输出数据到新文件??

Answer 1

记住 4 步：

打开文件 准备数据 写入文件 关闭文件

!===========================================
open(unit=fileid, file=filename)
do i=1,students
write(*,"('请输入'I2'号同学的中文、英文及数学成绩')") i
read(*,*) s(i)%Chinese, s(i)%English, s(i)%Math
write(fileid,"('座号:'I2/'中文:'I3' 英文:'I3' 数学:'I3)") i,s(i)
end do
close(fileid)

【注】这是截取某程序一段

特别注意 open read write close 这四句，其他可以不管

其中 fileid 和 filename 都是自己设定的

unit=6 时默认输出到屏幕，所以这里你可以随便取除6外的数字，比如15

filename 就是你想保存数据到的文件，如果文件就在程序文件夹，直接写文件名，如果要保存到其他地方，需要带上路径

Answer 2

三步：
（1）打开文件， 用 open 语句
（2）输出数据， 用 write 语句
（3）关闭文件， 用 close 语句

比如把 5， 6， 7， 8 四个数输出到文件的程序

open(1, file='test.out', mode ='write') ! 打开名为test.out的1号文件
write(1,*)5, 6, 7, 8
close(1)