相同代码Fortran运行出错

韵离堕、倾城泪

彭国伦《Fortran95程序设计》和书上相同的代码，但是vs2019运行结果出错，不知道原因，请教各位！！！

唐汉

没有看过你说的那本书，几个建议：
（1）一般现代Fortran里面声明变量最好加上 ::，你这个例子上，character(len=20) :: string
（2）虽然标准上并没有禁止你使用，不推荐单独用end这个关键字。在end后面加上scope的名称，比如说，end program xxx
（3）字符串的的slicing在Fortran里面有点麻烦，但是根据标准你必须要用“string(i:j)”这样的格式，你要print第六个原素，那就是string(6:6)，如果是第六个原素之后的所有，那就是string(6:)。

综上，这个程序可以这样写：

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

program main

    character(len=20) :: string

    string = "Good morning."
    write (*, *) string
    string(6:) = "evening."
    write (*, *) string
    
end program main

fcode

这是彭国伦书上的一处失误。