Fortran中write格式

在Fortran中，写入数据到文件或控制台可以使用write语句。write语句的一般格式如下：

write(unit, format) [output-list]

其中，`unit` 是指定输出单元的整数值，可以是文件号或者预定义的控制台输出单元。`format` 是一个字符串，用于指定输出的格式。`output-list` 是需要写入的数据列表。

下面是一些常见的格式化代码：

- `%d`: 整数
- `%f`: 浮点数
- `%e` 或 `%E`: 科学计数法的浮点数
- `%g` 或 `%G`: 自动选择 `%f` 或 `%e`
- `%s`: 字符串

下面是一个示例程序，将两个整数和一个字符串写入文件：

program write_demo
  implicit none
  integer :: i, j
  character(20) :: str

  i = 10
  j = 20
  str = "Hello, Fortran!"

  open(10, file='output.txt', status='replace')

  write(10, '(A)') "The values are:"
  write(10, '(2I5)') i, j
  write(10, '(A)') "The string is:"
  write(10, '(A20)') str

  close(10)
end program write_demo

在上面的示例程序中，我们使用 `open` 打开一个名为 `output.txt` 的文件，并将其指定为输出单元 `10`。然后，我们使用 `write` 语句将数据写入文件中。第一个 `write` 语句使用格式化代码 `A`，表示输出一个字符串。第二个 `write` 语句使用格式化代码 `2I5`，表示输出两个整数，每个整数占据 5 个字符的宽度。第三个 `write` 语句输出另一个字符串，使用格式化代码 `A20` 表示字符串占据 20 个字符的宽度。最后，我们使用 `close` 关闭文件。