关于循环输出文件，和循环改变初值的提问

楚香饭

文件名可以用字符串表示。
字符串可以由整数或浮点数转换。
这都不是问题。

问题是，我看不懂你的循环规则。
z0 在 -25200到-24800，400个数值之间变化。
而 x0 从 -2520到-2500，直到 -2500到-2480。只有20个变化。

楚香饭

对啊。那当 z0 变化到 -24800 时，x0 应该循环从 -2120 到 -2100 啊。
怎么可能还从 -2500到-2480 ？

楚香饭

[Fortran] 纯文本查看 复制代码

Program www_fcode_cn
  Implicit None
  character(len=10) :: c1 , c2
  integer z0 , x0 , k
  k = -2520
  Do z0 = -25200 , -24800
    write( c1 , '(g0)' ) z0
    Do x0 = k , k + 20
      !//计算代码
      write( c2 , '(g0)' ) x0
      Open( 12 , File = trim(adjustl(c1))//"-"//trim(adjustl(c2))//".txt")
      !// 输出代码
      Close( 12 )
    End Do
    k = k + 1
  End Do
End Program www_fcode_cn

楚香饭

我给代码都是自己亲自验证过的，可以编译链接的。

如果你提示有错误，请给出英文的，原版的错误提示，而不是自己翻译的。