Question

fortran如何在循环中每次计算完之后输出结果到文件，且该文件以迭代的步数有关

比如do 1,i
a=a+1
输出到文件‘a-i.txt’

Answer 1

character( len = 12 ) cfile

cfile = "aaa-iii.txt"
Do i = 1 , n
a = a + 1
write( cfile(1:3) , '(i3.3)' ) a
write( cfile(5:7) , '(i3.3)' ) i
Open( 12 , File = cfile )
End Do