Fortran 四捨五入 [問題]

看板Fortran作者 (半天雲)時間15年前 (2009/02/04 11:56), 編輯推噓4(404)
留言8則, 5人參與, 最新討論串1/1
題目是給我們k=1.2345678 要我們用write的format方法 顯示出 k=1 k=1.23 k=1.2345 k=1.234567 -------------------------------- program main implicit none real k k=1.2345678 write(*,"(x,F6.4)")k end 會顯示出1.2346 他自己四捨五入進位了 請教板上的高手 要怎麼改善這問題? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.115.201.25

02/04 13:13, , 1F
qq 中央有開Fortran的課程?
02/04 13:13, 1F

02/04 13:46, , 2F
將k無條件捨去到第n位: k = INT(k*(10**n))/REAL(10**n)
02/04 13:46, 2F

02/04 23:46, , 3F
to 1F 有
02/04 23:46, 3F

02/05 13:57, , 4F
以解決 我們是把K=1.2345678 轉成字串然後FORMAT取位數
02/05 13:57, 4F

02/05 17:33, , 5F
to 1F 不但有,就我所知還不只一門課有教Fortran
02/05 17:33, 5F

02/05 21:55, , 6F
是整門課只教Fortran,還是數值分析用到Fortran的呀
02/05 21:55, 6F

02/06 11:16, , 7F
當然是整門課在教Fortran
02/06 11:16, 7F

02/07 14:01, , 8F
我是數值分析用到FORTRAN
02/07 14:01, 8F
文章代碼(AID): #19YH7GFK (Fortran)