Cod sursa(job #405895)

Utilizator tudgal1001Profir Tudor tudgal1001 Data 28 februarie 2010 21:25:57
Problema Dezastru Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.79 kb
#include<stdio.h>
using namespace std;

int st[100],i,n,ka,cont=0;
float prod,prob=0,a[100];

void init(int k)
{
	st[k]=0;
}
int succesor (int k)
{
	if (st[k]<n)
	{
		st[k]++;
		return 1;
	}
	return 0;
}
int valid (int k)
{
	for (i=1; i<k; i++)
		if (st[i]==st[k]) return 0;
	return 1;
}
int solutie (int k)
{
	return k==n;
}
void tipar (int k)
{
	prod=1;
	for (i=1; i<=ka; i++)
		prod*=a[st[i]];
	prob+=prod;
}
void back (int k)
{
	init(k);
	while (succesor(k))
	{
		if (valid(k))
			if (solutie(k))
				{ cont++; tipar(k); }
		else back(k+1);
	}
}
int main ()
{
	freopen("dezastru.in","r",stdin);
	freopen("dezastru.out","w",stdout);
	scanf("%d %d",&n,&ka);
	for (i=1; i<=n; i++)
		scanf("%f",&a[i]);
	back(1);
	printf("%.6f",prob/cont);
	return 0;
}