Fortran语言如何读取和写入文件

Fortran是一种高级编程语言，用于数值和科学计算。在Fortran中，读取和写入文件是非常常见的任务。本文将介绍Fortran如何进行文件读写操作，并提供示例代码和代码释义。

Fortran文件读取教程

Fortran中，可以使用open命令打开文件，使用read命令读取文件，并使用close命令关闭文件。下面是一个简单的文件读取示例代码：

program read_file
  implicit none
  character(len=50) :: filename
  integer :: i, n
  real :: x

  ! 获取文件名
  print *, "请输入文件名："
  read *, filename

  ! 打开文件并读取文件
  open(unit=10, file=filename, status='old')
  read(10, *) n
  do i=1,n
    read(10, *) x
    print *, x
  end do
  close(unit=10)

end program read_file

在上面的代码中，我们首先声明了变量filename，i，n和x。然后使用print命令提示用户输入要读取的文件名。接着使用open命令打开文件，使用read命令读取文件中的数据，并在控制台输出读取到的数据。最后使用close命令关闭文件。

Fortran文件读写操作示例代码

除了读取文件，Fortran还可以写入文件。下面是一个简单的文件读写示例代码：

program read_write_file
  implicit none
  character(len=50) :: filename
  integer :: i, n
  real :: x, sum

  ! 获取文件名
  print *, "请输入文件名："
  read *, filename

  ! 打开文件并读取文件
  open(unit=10, file=filename, status='old')
  read(10, *) n
  sum = 0.0
  do i=1,n
    read(10, *) x
    sum = sum + x
  end do
  close(unit=10)

  ! 打开文件并写入文件
  open(unit=20, file='output.txt', status='replace')
  write(20, *) "文件中的元素个数：", n
  write(20, *) "文件中的元素和：", sum
  close(unit=20)

end program read_write_file

在上面的代码中，我们首先声明了变量filename，i，n，x和sum。然后使用print命令提示用户输入要读取的文件名。接着使用open命令打开文件，使用read命令读取文件中的数据，并计算数据的和。最后使用open命令打开一个名为output.txt的文件，使用write命令将计算结果写入文件中，并使用close命令关闭文件。

在上面的示例代码中，我们使用了以下命令：

• open：打开文件
• read：读取文件
• close：关闭文件
• write：写入文件

本文介绍了Fortran如何进行文件读写操作，并提供了示例代码和代码释义。要在Fortran中进行文件读写操作，需要使用open，read，write和close等命令。通过这些命令，我们可以轻松地读取和写入文件，从而完成各种数据处理任务。

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com