用“蒙特卡洛”法求π值 - 电脑报 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

用“蒙特卡洛”法求π值 AutoLISP程序文件装入错误的处理无线有源环绕音箱用Dreamweaver 3.0制作交互式动画小虽小，功能却不少——看图专家IrfanView Windows 95下“则灵”声卡故障一例细说ASP模式 Fireworks扩充插件:Twist and Fade 2.0(一)用EXCEL建立家庭收支表更换主板后UCDOS不能运行的处理