蒲丰投针 和 在 spss 里面的实现.要在spss软件里面编写程序,证明蒲丰投针的正确性 和 会面问题的概率为多少.本人不会使用spss.希望有详细的程序内容,复制就能运行.

蒲丰投针 和 在 spss 里面的实现.要在spss软件里面编写程序,证明蒲丰投针的正确性 和 会面问题的概率为多少.本人不会使用spss.希望有详细的程序内容,复制就能运行.
蒲丰投针 和 在 spss 里面的实现.
要在spss软件里面编写程序,证明蒲丰投针的正确性 和 会面问题的概率为多少.本人不会使用spss.希望有详细的程序内容,复制就能运行.

蒲丰投针 和 在 spss 里面的实现.要在spss软件里面编写程序,证明蒲丰投针的正确性 和 会面问题的概率为多少.本人不会使用spss.希望有详细的程序内容,复制就能运行.
我不会..

蒲丰投针的程序：（希望对你有帮助）
#include
#include
#include
#include
#include
#include
#define N 10000 /*N表示总的投掷次数*/
#de...

全部展开

蒲丰投针的程序：（希望对你有帮助）
#include
#include
#include
#include
#include
#include
#define N 10000 /*N表示总的投掷次数*/
#define TIME 5 /*做TIME次这样的实验，来平均求pi*/
int main(void)
{
int gdriver = DETECT, gmode, errorcode;
int xmax, ymax;
int x1,x2,y1,y2,i,j;
int counter = 0;
int l = 15,d = 70;
double pi = 0.0,p = 0.0,sum = 0.0;
initgraph(&gdriver, &gmode, "");
errorcode = graphresult();
srand((unsigned)time(NULL));
if (errorcode != grOk)
{
printf("Graphics error: %s\n",
grapherrormsg(errorcode));
printf("Press any key to halt:");
getch();
exit(1);
}
xmax = getmaxx();
ymax = getmaxy();
for(j=0;j {
setcolor(WHITE);
/* draw a diagonal line */
for(i=0;i<=ymax;i=i+d)
{
line(0, 0+i, xmax, 0+i); /*平行线d=70*/
}
setcolor(RED);
for(i=0;i {
x1 = rand()%(xmax+1); /*从0到xmax随机一点*/
y1 = rand()%(ymax+1);
do
{
x2 = rand()%(x1+l)+x1-l; /*从x1 +- l的范围中随机出一点x2，因为当x2偏离x1超过1个l后，就不可能有长度为l的线段产生*/
}while(x2>x1+l);
y2 = sqrt(l*l - (x2-x1)*(x2-x1))+y1; /*算出点y，限制条件为长度为l*/
line(x1,y1,x2,y2);
if(y1/d!=y2/d) /*相交条件*/
{
counter++;
}
}
printf("intersected lines are:%d\n",counter);
p = (double)counter/N;
printf("the probability is :%lf\n",p) ;
pi = (double)2*l/(p*d);
printf("The 'pi' is :%lf",pi);
printf("press any key to clear\n");
counter =0;
sum +=pi;
getchar();
system("cls");
}
printf("The average pi is : %lf",sum/TIME);
getch();
closegraph();
return 0;
}

收起