Question

fortran编写程序去除空格为什么不能直接用trim函数呢

program main
implicit none
character::string,a
write(*,*)"请输入含有空格的字符串"
read(*,*)string
a=trim(string)
write(*,*)a
end

Answer 1

1. 你的字符串定义时没有给长度。
   

2. trim 只能去除字符串后面的空格。

3. 去除前面的空格请空 adjustL

4. 去除中间的空格请独立编程实现。