Pagini recente » Cod sursa (job #775001) | Istoria paginii runda/cei_mai_mari_olimpicari_runda_4/clasament | Cod sursa (job #400654) | preoni-2007/runda-finala/poze/evaluare | Cod sursa (job #1591816)
#include <fstream>
#include <iomanip>
using namespace std;
ifstream cin ("dezastru.in");
ofstream cout("dezastru.out");
double a[40];
int aa[40];
int n, k;
double contor, probabil;
void bak(int p, int q)
{
if(p<=k)
{
for(int i=q+1; i<=n; ++i)
{
aa[p]=i;
bak(p+1, i);
}
}
else
{ double pp=1;
for(int i=1 ;i<=k; ++i)pp*=a[aa[i]];
++contor;
probabil+=pp;
}
}
int main()
{
cin>>n>>k;
for(int i=1; i<=n; ++i)cin>>a[i];
bak(1,0);
double ans=probabil;
cout<<fixed<<setprecision(6)<<ans/contor;
return 0;
}