作者kingpipi (屁屁翘)
看板Fortran
标题[问题] 如何降低有效位数，爬文都找不到相关资料><
时间Fri May 21 22:19:25 2010
最近老师在学校拍给我们的作业
是使用高斯消去法解联立方程式
解出来之後，还必须使用iteative refinement修正解答使解答更正确
因为老师有说必需使用3个digit来做计算，这样比较明显
但我不知道该如何改成3-digit来去做计算
请各位大大帮忙!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.110.25.19
1F：→ gdi2000520:REAL(kind=??) 05/22 10:15
2F：推 motoman:是不是指 要用到小数点下第三位?? 05/22 10:17
3F：→ gdi2000520:请找篇数562 楼上大大是作者 05/22 10:18
4F：→ kingpipi:我试了一下real(kind=??)的方法，但我还是不太懂如果使用 05/22 17:16
5F：→ kingpipi:real(kind=4) or real(kind=8) 可以，但我用了real(kind= 05/22 17:16
6F：→ kingpipi:3) 就说错误，所以我现在还是无解 05/22 17:17
7F：→ kingpipi:可以请大大帮忙写一下a=2.587426985乘b=6.2578336使用三 05/22 17:18
8F：→ kingpipi:个DIGIT(储存到小数点下三位)的方法写个简单的程式吗，拜 05/22 17:19
9F：→ kingpipi:托 05/22 17:19
10F：→ motoman:不是= = 你kind设4or8 都行 你输出格式要打F10.3 3在这里 05/22 17:34
11F：→ motoman:kind是数字的储存大小 一般不支援3 05/22 17:35
12F：→ motoman: write(*,"(F10.3)") a*b 05/22 17:35
13F：→ kingpipi:我想大大你误会我意思了，我主要是要让他a=2.587乘 05/22 17:45
14F：→ kingpipi:b=6.259这样去算，而不是算完之後输出结果所显示的格式 05/22 17:46
15F：→ kingpipi:我主要是想让计算的精度降低，才能看的出高斯消去法所会 05/22 17:47
16F：→ kingpipi:产生的误差 05/22 17:47
17F：→ acyang:我会先乘上1000取整数後再除以1000 05/22 18:41
18F：推 motoman:抱歉搞错! 就用楼上这个方法吧 05/22 19:51
19F：→ kingpipi:谢谢各位的帮忙目前好像也只有acyang大的方法可行，感谢 05/23 00:19