论坛 › Fortran语法讨论 › 一个表控格式分列的问题

wawewen 发表于 2019-11-1 13:45:50

一个表控格式分列的问题

源代码
       program ex
      implicit none
      character(len=50)input,output
      integer i,strlen
      integer::j=1
      write(*,*)"请输入字符串"
      read (*,"(A50)")input
      strlen=len_trim(input)
      do i=1,strlen
      if (input(i:i)/=' ')then
      output(j:j)=input(i:i)
      j=j+1
      end if
      end do
      write(*,"(A50)")output
      end
把read和write格式改成（*，*）后执行结果不一样，有没有大佬说明一下，本人才学习Fortran一周，还请大佬赐教

li913 发表于 2019-11-1 15:22:34

不加格式，遇到空格或逗号就读取完毕。格式详解可以看看http://fcode.cn/resource_ebook-32-1.html第二讲。

fcode 发表于 2019-11-2 08:42:44

read(*,*) 称为表控格式。
表控格式认为空格和逗号，TAB，是“间隔符”
这个思想，可以参考excel的“分列功能”

wawewen 发表于 2019-11-5 14:32:59

li913 发表于 2019-11-1 15:22
不加格式，遇到空格或逗号就读取完毕。格式详解可以看看http://fcode.cn/resource_ebook-32-1.html第二讲。 ...

多谢大佬！

wawewen 发表于 2019-11-5 14:33:31

fcode 发表于 2019-11-2 08:42
read(*,*) 称为表控格式。
表控格式认为空格和逗号，TAB，是“间隔符”
这个思想，可以参考excel的“分列功 ...

多谢！长路漫漫啊

查看完整版本: 一个表控格式分列的问题