[問題] 想問一個簡單的例子 讀檔案

[chengyu2001 (踩到瘋狗尾巴= =)]

想問一個簡單的例子
 program test
 real,dimension(11)::a
 open(unit=10,file='number.txt',status='old')
 read(10,*) a
 write(*,*) a
 end

 number.txt裡面有 10個數字
 我想把10個數字讀進去a裡面在輸出到螢幕

無奈這邊卻出錯 請問這樣是否可行

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 140.116.189.152
→ awer89:open以後要close
→ crazy10167:20 read(10,*,end=30) a
→ crazy10167:write(*,*) a
→ crazy10167:go to 20
→ crazy10167:30 continue
→ crazy10167:end
→ crazy10167:好像錯了
→ Cypresslin:問題不是在於close吧....不close也不是說不行
→ tonyruler:stop?
推 jsb:       關鍵應該是有 11 個空格卻只有 10 個數字。
推 Cypresslin:樓上正解