ex0413.f90

来自「Fortran 95程序设计&Code-彭国伦」· F90 代码 · 共 8 行

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