WRITE(*,'(A5$)')name(i)
のような書式で、表示位置を決める定数"5"の部分をREAD文で読み取って
任意の値に変更できるようにしたいのですが､
どうすればいいでしょうか？

ちなみに
　 num=5
　1000 FORMAT(Anum$)
　 WRITE(*,1000)name(i)
と書いたのですがうまくいきませんでした。