fortran语言写字符串

Fortran语言中字符串可以使用字符数组来表示。例如，要定义一个包含字符串“Hello World”的字符数组，可以使用以下代码：

character(len=11) :: str
str = 'Hello World'

在上面的代码中，`len=11`表示字符串的长度为11（包括空格）。如果要定义一个可变长度的字符串，可以使用`allocatable`关键字，例如：

character(len=:), allocatable :: str
str = 'Hello World'

这样定义的字符串可以根据需要分配任意长度。在使用字符串时，可以使用内置函数和操作符来处理它们，例如：

! 获取字符串长度
len = len(str)

! 拼接字符串
str = trim(str) // ' from Fortran'

! 比较字符串
if (str == 'Hello World from Fortran') then
    print *, 'Strings are equal'
else
    print *, 'Strings are not equal'
endif