作者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