fortran将数据文件导入二维数组再在另一个文件输出

2025-03-11 02:51:31

推荐回答（1个）

回答1：

程序中文件用完后要关闭，程序段修改如下：
		OPEN(8,FILE='spec.txt')
         	DO i=1,20001
           		DO j=1,99
            			READ (8,'(E16.3)') A(i,j)
           		ENDDO
         	ENDDO
		CLOSE(8)
       		OPEN(8,FILE='OH.txt')
         	DO i=1,20001
            		WRITE (8,'(99E13.3)')(A(i,J),J=1,99)  
         	ENDDO
		CLOSE(8)
		如果仍有错误，那可能是spec.txt文件不满足20001行99列 ！

fortran将数据文件导入二维数组 再在另一个文件输出

fortran将数据文件导入二维数组再在另一个文件输出