cnCalc计算器论坛 [原fx-es(ms)论坛]

 找回密码
 注册
搜索
返回列表
查看: 1527|回复: 4

[fx-CG10/20系列] [LIBZ依赖]Random Pi Calc随机数逼近Pi程序

[复制链接]
发表于 2013-4-4 18:59:47 | 显示全部楼层 |阅读模式
计算器程序
程序名称: PICALC
平台: 其他 
系统/软件要求: LIBZ 1.05+
版本号: 1.6
类型: 数学 
作者: zhj
大小(K): 0.75
更新日期: 2013-03-31
描述: 模拟随机坐标落在正方形内切圆内外的概率来逼近Pi。
已知缺陷: -
源代码: 开源/部分开源
本帖最后由 zhj 于 2013-4-5 08:07 编辑

依赖于LIBZ 1.05+
密码:zhj

PICALC~1.g3m

800 Bytes, 下载次数: 11, 下载积分: 金钱 -2

发表于 2013-4-5 14:05:16 | 显示全部楼层
我很早就写过Add-in的了
发表于 2013-4-6 21:10:52 来自手机 | 显示全部楼层
LS就这样湮灭LZ的激情..
发表于 2013-4-14 07:27:19 | 显示全部楼层
LZ的东西不错!虽然没有实体机……但是我是来看看算法的)lulu(LS的LS)绝对不是萝莉!不要相信她!
发表于 2013-4-14 13:21:43 | 显示全部楼层
空谈误国,直接上代码。
  1. 0->I
  2. 0->J
  3. ?->N
  4. ClrText
  5. For 1->I To N
  6.   Ran# ->X
  7.   Ran# ->Y
  8. If √((X-0.5)²+(Y-0.5)²)≤0.5
  9. Then J+1->J
  10. Locate 1,1,4J/I
  11. Locate 1,2,((I/N)*100)
  12. Next
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

联系站长|Archiver|手机版|cnCalc计算器论坛  

GMT+8, 2018-12-12 18:11 , Processed in 0.037545 second(s), 25 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表