qq_42632730的博客

求圆周率，可以通过反正切公式来计算、利用割圆法等，也可以用频率估计概率的方法来求。 假设一个正方形的面积为4，则其内切圆面积为π，现向正方形内随机投掷米粒，可知米粒落在圆中的次数占总数的π/4。经过大量实验，用这个频率乘4可得π的近似值。 本程序使用这种方法，利用VB的随机数生成器来实现，并画出p*4的折线图，理论上会稳定在3.14159附近，图供参考。 附有VB源码，带注释。随机数生成器已经经过一些改良，如果可以更有随机性就更好了。

布丰投针试验为大家所熟知，规则是在分布有平行线的平面上投针，大量重复实验记录数据，得出针压线的概率。本程序0.08秒一次随机投针，呈现在界面上，并画出压线概率折线图，其概率将稳定在一个常数附近，因此可以用频率估计概率来求得压线概率。这便是布丰投针试验的精髓。附有VB源码。

程序模拟三体运动，有三种观察模式，显示运动轨迹，粗细随速度而改变，非常漂亮，欣赏混沌之美。用vb绘图实现，附源码。Render Mode就是观察模式，实现所说效果填1即可。