poj2151

最新推荐文章于 2019-09-10 09:15:12 发布

weixinding

最新推荐文章于 2019-09-10 09:15:12 发布

阅读量718

点赞数

CC 4.0 BY-SA版权

本文链接：https://blog.youkuaiyun.com/weixinding/article/details/7226480

本文深入探讨了如何通过数学模型解决一个涉及队列与题目匹配概率的问题，包括多组数据输入，每组数据包含队伍数量、题目数量以及每支队伍对每道题目的正确率。通过详细的算法实现，文章提供了计算每个队伍至少完成一道题，以及冠军至少完成特定数量题目概率的方法。本篇内容不仅展示了概率论在实际问题解决中的应用，还提供了具体的编程实现，适合计算机科学与数学领域的学习者深入研究。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

【题意】

m道题，t个队伍，给出每个队伍做对每道题的概率，求每个队伍起码做出来一道题，冠军至少做出来n道题的概率

【输入】

多组数据

每组数据第一行为m,t,n

接下来是一个t*n的矩阵，表示每个队伍做出每道题的概率

数据以一行三个0结束

【输出】

对于每组数据，输出一个保留三位小数四舍五入的概率

没什么说的

program poj2151;
var
  n,m,t,i,j,k:longint;
  ans,temp,all:double;
  p:array [0..1001,0..31] of double;
  f:array [0..31,0..31] of double;
begin
  repeat
    read(m,t,n);
    if (m=0)and(t=0)and(n=0) then break;
    for i:=1 to t do
      for j:=1 to m do
        read(p[i,j]);
    ans:=1;
    all:=1;
    for i:=1 to t do
      begin
        fillchar(f,sizeof(f),0);
        f[0,0]:=1;
        for j:=1 to m do
          begin
            for k:=0 to j-1 do
              f[j,k]:=f[j,k]+f[j-1,k]*(1-p[i,j]);
            for k:=1 to j do
              f[j,k]:=f[j,k]+f[j-1,k-1]*p[i,j];
          end;
        ans:=ans*(1-f[m,0]);
        temp:=0;
        for j:=1 to n-1 do
          temp:=temp+f[m,j];
        all:=all*temp;
      end;
    ans:=ans-all;
    writeln(round(ans*1000)/1000:0:3);
  until false;
end.