VBA实现蒙特卡罗方法Excel示例-计算圆周率PI

c++版
#include<iostream>
#include<cmath>
using namespace std;
int main()
{
int p=0;float a,u1,u2,pi;
for(int i=0;i<100;i++)
{u1 = random_uniform_0_1();
u2 = random_uniform_0_1();
if ((a=sqrt((u1-0.5)^2+(u2-0.5)^2))<0.5)
p=p+1;
}
pi=p/25;
cout<<pi;
renturn 0;
}

楼主最后三行代码是不是不对啊。我执行到那就停住了

非常感谢