ex0413.f90

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

program ex0413
  character(len=20) string 
  string = "Good morning."
  write(*,*) string
  string(6:) = "evening." ! 重设设定从第6个字符之后的字符串
  write(*,*) string
end