piFenZi=245850922.0
pifenMu=78246779
``
```
PI <- 3.14159265358979323846
zuijin=3
zuixiao <-1.0
zuijin_fZ <- 105850920
zuijin_fM <- 7000001 #7个0
for(d1fz in seq(245850920,245850930,1) ) {#for110
for(d2fm in seq(78256770,78256790,1) ) {#for210
temP<- d1fz/d2fm
if(zuixiao> abs(temP-PI) ) { zuijin=temP
zuixiao=abs(temP-PI)
zuijin_fZ=d1fz
zuijin_fM=d2fm
}
}#for210
}#for110
print("zuijin_fZ:")
print(zuijin_fZ)
print("FenMu:")
print(zuijin_fM)
```
结果就是 高精度密率:
FenZi=245850922
> print("FenMu:")
[1] "FenMu:"
> print(zuijin_fM)
[1] 78256779
- R高精“密率”-PI的分数的高精度表示形式-R语言181000a
- 高精“密率”-PI的分数的高精度表示形式181001
- java40k2011Terryfix181002
- PI的高精度分数表示形式180101
- c++算PI的分数表示形式180102
- 单圆弧的反射181001a
- 单个圆的圆弧反射181020a
- 附录11:181001非控制台(WindowsForm)窗口程序创建控制台(调试程序用
- 递归调用-判断两圆相碰撞情况181020
- 用递归算法模拟两圆反射Billiards181020
- 光线(粒子)在两圆间碰撞效果1810a
- 光线粒子在两圆内壁碰撞效果1810B
- twoBillards模拟光线(粒子)在重叠的两圆内壁的碰撞C++完整代码(带注释)Terry181001