くだすれFORTRAN(超 ..
116:デフォルトの名無しさん
08/02/02 22:06:06
俺の方法は
character(len=50):: fmt
integer:: line
write(fmt,*) "A7,", line, "F8.2"
do i = 1, ii
read(40,fmt) dummy3,(a(i,j),j=1,jj)
enddo
てやると思う。
数字書き出すときに1桁、2桁、3桁それぞれ別書式にする場合に使ってる。
次ページ続きを表示1を表示最新レス表示スレッドの検索類似スレ一覧話題のニュースおまかせリスト▼オプションを表示暇つぶし2ch
4398日前に更新/200 KB
担当:undef