用“蒙特卡洛”法求π值 - 电脑报 1992-2001 十年文章全集

微信公众号　

图码生活

每天发布有五花八门的文章，各种有趣的知识等，期待您的订阅与参与

电脑报 1992-2001 十年文章全集

包含从 1992 年 - 2001 年间，两万余篇期刊文章，查询最少输入两个字符

查

随便看看

标题用“蒙特卡洛”法求π值

栏目软件操作与技巧
作者四川省通江县中学高九四级六班　张渝
发布1992-10-02

　　10 INPUT “模拟次数”，CS
　　20 T=0
　　30 FOR I=1 TO CS
　　40 X=RND(1)*6:M=X+0.5:N=X-0.5
　　50 FOR J=1 TO 5 STEP 2
　　60 IF M>J AND N<J THEN T=T+1
　　70 NEXT J，I
　　80 PI=CS/T:PRINT "P1=";PI
　　90 END

用“蒙特卡洛”法求π值菜鸟冬瓜(40)FlashGet站点资源探索器的使用电脑游戏SOS(三十)自杀键的意义用NU给文件名加注释风起云涌810(下篇)——810主板横向测试佳能打印机经销商相约鹏城挑灯看剑──虚拟光驱软件大比拼网络无边法律有洞?