Cod sursa(job #39970)

Utilizator skyelHighScore skyel Data 27 martie 2007 10:08:23
Problema Dezastru Scor 60
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.58 kb
#include<iomanip.h>
#include<stdio.h>
#define input "dezastru.in"
#define output "dezastru.out"
#define Nmax 30
float x[Nmax],proc=0,sum=0;
int n,k,i;

void btk(int y,int i,float t)
	  {
	  if(y==k)
		  {
		  sum+=t;
		  proc++;
		  }
	  else
			{
			for (;i<n;i++)
				 {
				 t*=x[i];
				 btk(y+1,i+1,t);
				 t/=x[i];
				 }
			}
	  }


int main()
	 {
	 int i;
	 freopen(input,"r",stdin);
	 freopen(output,"w",stdout);
	 scanf("%d %d",&n,&k);
	 for (i=0;i<n;i++)
		  scanf("%f",&x[i]);
	 btk(0,0,1);
	 sum/=proc;
	 printf("%f",sum);
	 return 0;
	 }