Pagini recente » Cod sursa (job #2142937) | Cod sursa (job #1923617) | Cod sursa (job #1045346) | Clasament Winter Challenge 2008, runda 2 | Cod sursa (job #1713326)
#include <iostream>
#include <fstream>
using namespace std;
ifstream f("dezastru.in");
ofstream g("dezastru.out");
int n,k,v[30],nr;
double a[30],s,t=1;
void citire()
{
f>>n>>k;
int i;
for(i=1;i<=n;i++)
{
f>>a[i];
}
}
void gasit()
{
s=s+t;
nr++;
}
void back(int p)
{
int i;
for(i=v[p-1]+1;i<=n;i++)
{
v[p]=i;
t=t*a[i];
if(p==k)
gasit();
if(p<k)
back(p+1);
t=t/a[i];
}
}
int main()
{
citire();
back(1);
g<<s/nr;
return 0;
}