作者skyrjs (嚕嚕米)
看板Fortran
標題[問題] 輸出資料的方法
時間Sat Apr 10 15:38:31 2010
請問板上各位大大，如何將得到的每筆結果，在最後才一次輸出
--------------------簡略的例子---------------------
program zzz
real a,b,c
10 WRITE(*,*)'請輸入A和B即可得到C=A+B'
READ(*,*,END=999)A,B
C=A+B
WRITE(*,*)C,' = ',A,'+',B
GOTO 10
999 WRITE(*,*)'FINISH'
END
----------------------------------------------------
我只會這樣寫，結果是
請輸入A和B即可得到C=A+B
3
1
4. = 3.+ 1.
請輸入A和B即可得到C=A+B
1
2
3. = 1.+ 2.
請輸入A和B即可得到C=A+B
.
.
.(迴圈)
----------------------------------------------------
我想要的結果是
請輸入A和B即可得到C=A+B
3
1
請輸入A和B即可得到C=A+B
1
2
結束之後寫出
4. = 3.+ 1.
3. = 1.+ 2.
------------------寫的不盡詳盡請多指教--------------
--
一 二 三 四 Total H E
海工v.s化學
海工 4 15 2 7 28 15 0
一1:4
_____________________________________
二1:13
三6:17
化學 0 0 0 0 0 2 5
四18:25
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.165.3.247
1F：→ mantour:用array把輸入存起來再計算 04/10 15:55
2F：→ skyrjs:多謝 04/10 19:34