※ 引述《koala4120 (pure)》之銘言： : write(*,*) 'input x=?' : read(*,*) x : sum=sum+x : a=(x/180.0)*pi : b=sin(a) : do n=2, ns, 1 ..... ..... : do while(1.0/(1-x)>0. .and. x/=1) : y=alog(1.0/(1-x)) : write(*,*) x,y : write(*,*) 'input x=?' : read(*,*) x : enddo : enddo : write(*,*) c_err,"=",a,"-",sum : 以上是我寫的程式 : 想請問一下 : 我原本想寫的是將X值輸入進去以後 : 可以跑出兩個顯示 : 一個是X與Y : 另一個是sin(X)與sin函數的泰勒展開式的差值 : 但是卻是只有一個顯示出現 : 不是出現X與Y的值就是出現sin(X)與sin函數的泰勒展開式的差值 當只有X Y值時 代表它 write(*,*) x,y 不過write(*,*) x,y後 你又read一個x值 當DoWhile迴圈內的x有特定值(>1) 繼續 write(*,*) x,y 不過這樣就沒有 write(*,*) c_err,"=",a,"-",sum 當有執行到 write(*,*) c_err,"=",a,"-",sum 代表do while迴圈x條件不合 所以沒有 write(*,*) x,y 這樣你應該知道大概如何改了吧XD -- http://www.wretch.cc/blog/Dolphin0112 裡面只是隨手亂寫~~~XD http://tinyurl.com/dkmkjo --

※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.42.208.68 ※ 編輯: awer89 來自: 114.42.208.68 (03/26 02:16)