将整数转换为字符串以在运行时创建输出文件名

我有一个 Fortran 程序，可以将结果保存到文件中。目前我使用打开文件

OPEN (1, FILE = 'Output.TXT')

但是，我现在想运行一个循环，并将每次迭代的结果保存到文件中'Output1.TXT', 'Output2.TXT', 'Output3.TXT'， 等等。

Fortran 中有没有一种简单的方法可以从循环计数器构造文件名i?

您可以写入单元，也可以写入字符串

program foo
    character(len=1024) :: filename

    write (filename, "(A5,I2)") "hello", 10

    print *, trim(filename)
end program

请注意（这是我谈论的第二个技巧），您还可以以编程方式构建格式字符串。

program foo

    character(len=1024) :: filename
    character(len=1024) :: format_string
    integer :: i

    do i=1, 10
        if (i < 10) then
            format_string = "(A5,I1)"
        else
            format_string = "(A5,I2)"
        endif

        write (filename,format_string) "hello", i
        print *, trim(filename)
    enddo

end program