面试题：Fortran字符串连接及子串提取问题

Question

在Fortran中，给定两个字符串变量 `str1` 和 `str2`，如何将它们连接成一个新的字符串？另外，假设连接后的字符串为 `combined_str`，怎样提取从第5个字符开始长度为8的子串？请用代码示例说明。

Answer 1

在Fortran中，可以使用 // 运算符来连接字符串。要提取子串，可以使用数组切片的方式。以下是代码示例：

program string_operations
    implicit none
    character(len=50) :: str1, str2, combined_str, sub_str
    str1 = 'Hello'
    str2 = ', World!'
    combined_str = str1 // str2
    sub_str = combined_str(5:12)
    print *, combined_str
    print *, sub_str
end program string_operations

在上述代码中：

1. 使用 // 运算符将 str1 和 str2 连接成 combined_str。
2. 使用 combined_str(5:12) 提取从第5个字符开始长度为8的子串，并存储在 sub_str 中。
3. 使用 print * 输出连接后的字符串 combined_str 和提取的子串 sub_str。