推 hillock0:REAL, ALLOCATABLE :: X(:) 11/22 21:51
→ hillock0:INTEGER :: N 11/22 21:52
→ hillock0:READ (*,*) N 11/22 21:52
→ hillock0:ALLOCATE( X(N) ) 11/22 21:53
推 YCTzeng:real宣告必須在程式的一開始,所以應該使用可變大小的陣列 11/23 12:08
→ YCTzeng:real(8),dimension(:),allocatable :: x 11/23 12:09
→ YCTzeng:read(*,*) n 然後 allocate(x(n)) 11/23 12:10
推 laa7352:接樓上,如果陣列的維度要重設用deallocate(x) 11/23 18:40
→ jsrdoz:謝謝大家^^ 11/23 23:20