program ex implicit none character(len=40) A(3000),B(3000),C(3000) !A异常、B已开挖、C需标记 integer i,j,N1,N2,count !N1是10号文件行数,N2是11号文件行数,count是计数器 open(unit=10,file="10异常焊口编号列表.txt") !异常焊口编号列表 open(unit=11,file="11以开挖焊口列表.txt")
Fortran文件读写--查找内容
最新推荐文章于 2025-03-26 15:10:30 发布