ex0425.f90

Fortran 95程序设计【彭国伦】第4章原代码

program ex0425
  character(len=10) fmtstring
  fmtstring = "(I2)"
  write(*,fmtstring) 3
end