有关概率论的题目
- 你的回答被采纳后将获得:
- 系统奖励15(财富值+成长值)+难题奖励20(财富值+成长值)
展开全部
从数学上推理来解这道题是很难的,这时计算机随机模拟求解就有用武之地。
模拟计算10万次得到的概率为:0.82544
模拟pascal程序如下:
const
a:array[0..3] of integer=(1,2,3,4);
var
i,j,sum:integer;
k,m,n:longint;
begin
m:=100000;
randomize;
n:=0;
for k:=1 to m do begin
sum:=0;
for i:=1 to 100 do sum:=sum+a[random(4)];
if sum>=240 then inc(n);
end;
writeln(n/m:0:9);
end.
模拟计算10万次得到的概率为:0.82544
模拟pascal程序如下:
const
a:array[0..3] of integer=(1,2,3,4);
var
i,j,sum:integer;
k,m,n:longint;
begin
m:=100000;
randomize;
n:=0;
for k:=1 to m do begin
sum:=0;
for i:=1 to 100 do sum:=sum+a[random(4)];
if sum>=240 then inc(n);
end;
writeln(n/m:0:9);
end.
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |