主题：请问Fortran 如何按照参数产生档名。
请问Fortran 如何按照参数产生档名。
ex
input parameters: 10 20 1 1 50
产生Output File name: 10_20_1_1_50.txt
您所在位置：社区首页 — Fortran讨论区 — 请问Fortran 如何按照参数产生档名。
请问Fortran 如何按照参数产生档名。
ex
input parameters: 10 20 1 1 50
产生Output File name: 10_20_1_1_50.txt
沙发
INTEGER :: a(5), i
CHARACTER(LEN=5) :: b(5)
CHARACTER(LEN=100) :: filename
READ(*,*) a
filename = ""
do i = 1, 5
write(b(i),"(I2)") a(i)
filename = trim(filename) // trim(b(i))
if(i < 5) then
filename=trim(filename) // "_"
end do
filename = trim(filename) // ".txt"
您尚未登录，请登录后再回复。点此登录或注册