Fortran Coder

查看: 2321|回复: 4
打印 上一主题 下一主题

[文件读写] 使用backspace语句出现问题

[复制链接]

798

帖子

2

主题

0

精华

大宗师

F 币
3793 元
贡献
2268 点
楼主
发表于 2022-9-20 09:44:30 | 显示全部楼层
character(512) str, line
do i=1,n
read(12,"(a)") str
if(str(1:1)=='#') line=str
if(str(1:8)='   #3215') then
...处理line
end if
end do
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-6 09:30

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表