解 >>clear,clf ●n=10000000;=0.5;m=0;d=1; ●fori=l:n x=(/2)*sin(rand(1)*pi);y=rand(1)*d/2; ● if x>=y ● m=m+1; 确定针与平 确定针中心 行线的角度 点的位置 end ●end ●pl=m/n ●pai=2*n*l/(m*d 27135 解  >> clear,clf  n=10000000;l=0.5;m=0;d=1;  for i=1:n  x=(l/2)*sin(rand(1)*pi); y=rand(1)*d/2;  if x>=y  m=m+1;  end  end  p1=m/n  pai=2*n*l/(m*d) 确定针与平 行线的角度 确定针中心 点的位置 27/35