作者wanghank12 (半天云)
看板Fortran
标题Fortran 四舍五入 [问题]
时间Wed Feb 4 11:55:59 2009
题目是给我们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
1F：→ Semisphere:qq 中央有开Fortran的课程? 02/04 13:13
2F：推 latinboy: 将k无条件舍去到第n位: k = INT(k*(10**n))/REAL(10**n) 02/04 13:46
3F：推 Cypresslin:to 1F 有 02/04 23:46
4F：→ wanghank12:以解决 我们是把K=1.2345678 转成字串然後FORMAT取位数 02/05 13:57
5F：推 agody:to 1F 不但有,就我所知还不只一门课有教Fortran 02/05 17:33
6F：→ Semisphere:是整门课只教Fortran，还是数值分析用到Fortran的呀 02/05 21:55
7F：推 agody:当然是整门课在教Fortran 02/06 11:16
8F：→ wanghank12:我是数值分析用到FORTRAN 02/07 14:01