zhj 发表于 2013-4-4 18:59:47

[LIBZ依赖]Random Pi Calc随机数逼近Pi程序

本帖最后由 zhj 于 2013-4-5 08:07 编辑

依赖于LIBZ 1.05+
密码：zhj

imath 发表于 2013-4-6 21:10:52

LS就这样湮灭LZ的激情..

水瓜 发表于 2013-4-14 07:27:19

LZ的东西不错！虽然没有实体机……但是我是来看看算法的）lulu（LS的LS）绝对不是萝莉！不要相信她！

cnzym 发表于 2013-4-14 13:21:43

空谈误国，直接上代码。0->I
0->J
?->N
ClrText
For 1->I To N
Ran# ->X
Ran# ->Y
If √((X-0.5)²+(Y-0.5)²)≤0.5
Then J+1->J
Locate 1,1,4J/I
Locate 1,2,((I/N)*100)
Next
页: [1]
查看完整版本: [LIBZ依赖]Random Pi Calc随机数逼近Pi程序