gfortran Linux字符串处理如何进行

   2024-09-30 5220
核心提示:在Linux系统下,使用gfortran编译器进行Fortran程序开发时,可以通过以下方法进行字符串处理:字符串拼接:program maincharacte

在Linux系统下,使用gfortran编译器进行Fortran程序开发时,可以通过以下方法进行字符串处理:

字符串拼接:
program main    character(len=20) :: str1, str2, result_str    str1 = "Hello, "    str2 = "World!"    result_str = str1 // str2    print *, result_strend program main
字符串长度:
program main    use iso_fortran_env, only: int32    implicit none    character(len=20) :: str    integer(int32) :: str_length    str = "Hello, World!"    str_length = len_trim(str)    print *, "String length: ", str_lengthend program main
字符串比较:
program main    character(len=20) :: str1, str2    logical :: is_equal    str1 = "Hello, World!"    str2 = "Hello, World!"    is_equal = str1 == str2    print *, "Strings are equal: ", is_equalend program main
字符串截取:
program main    character(len=20) :: str, substr    str = "Hello, World!"    substr = str(1:5)    print *, "Substring: ", substrend program main
字符串查找:
program main    use iso_fortran_env, only: int32    implicit none    character(len=20) :: str, target    integer(int32) :: pos    str = "Hello, World!"    target = "World"    pos = index(str, target)    print *, "Position of target: ", posend program main
字符串替换:
program main    character(len=20) :: str, old_substr, new_substr, result_str    integer :: pos    str = "Hello, World!"    old_substr = "World"    new_substr = "Fortran"    pos = index(str, old_substr)    if (pos > 0) then        result_str = str(1:pos-1) // new_substr // str(pos+len(old_substr):)    else        result_str = str    end if    print *, "Replaced string: ", result_strend program main

这些示例展示了如何在Linux系统下使用gfortran编译器进行基本的字符串处理。你可以根据需要修改和扩展这些代码来满足你的实际需求。

 
举报打赏
 
更多>同类物流大全
推荐图文
推荐物流大全
点击排行

网站首页  |  关于我们  |  联系方式 | 网站留言    |  赣ICP备2021007278号