Re: [問題] 我寫一個判斷象限的流程,但不知問題在 …

看板Fortran作者 (怕,你就輸一半!)時間15年前 (2009/08/26 22:14), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串4/4 (看更多)
※ 引述《DrStein (交換關聯)》之銘言: : ※ 引述《libra1005 (怕,你就輸一半!)》之銘言: : : --------------------分隔線---------------------------------------------------- : : program ex0508 : : implicit none : : real x,y,ans : : write(*,*)"Input(x,y)" : : read(*,*)x,y : : if(X>0.and,y>0)then : : ans=1 : : else if(X>0.and,y<0)then : : ans=4 : : else if(X<0.and,y>0)then : : ans=2 : : else if(x=0.or.y=0)then : : ans=0 : : else if(X<0.and,y<0)then : : ans=3 : 個人心得,不要 77與95的習慣混用 : 要嘛就全用.eq. .gt. .le. : 要嘛就全用 == > <= : 我個人習慣是用 77寫法 : 這種羅籍比較,非常容易出bug,最常見就是= =被寫成 = : 用77寫法反比較容易強調這是個比較,而不是個運算 : ( : 我用C/C++都會用preprocessor定義 gt lt這類的 : #define gt > : #define ge >= : : : ) 感謝以上幫忙修正的高手,小弟由衷感激~~ 小弟初學FORTRAN,經由高手解惑,終於跑出結果,感謝~ -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.116.115.206 ※ 編輯: libra1005 來自: 140.116.200.92 (08/27 13:38)
文章代碼(AID): #1AbKD4qz (Fortran)
文章代碼(AID): #1AbKD4qz (Fortran)