Fortran读数据

于金0912

晕，Fortran怎么读数据文件啊？这样不对？文件共169行、5列


program ex001
    implicit none
    integer i,j
    integer allocatable::a(i,j)
    character(len=80)::filename="14112014.000"
    logical alive

    inquire(file=filename,exist=alive)
    if(alive)then
        open(10,file=filename,status="old")
        allocate(a(i,j))
        do i=1,169
        do j=1,5
            a(i,j)
        end do
        end do
        read(10,*)a(i,j)
        write(*,*)a(i,j)
    else
        write(*,*)filename,"doesn't exist"
    end if
    stop
    end

topmad

读取部分有点问题
  do i=1,169
     read(10,*) (a(i,j),j=1,5)
   enddo

以你对数据的描述 应该是这样

于金0912

求解！！！

topmad

micaps格式的数据  搞清楚每一列都是啊干啥的

于金0912

亲，我刚学Fortran，就随便找了个数据来读，就想把这个数据都读进来