Cod sursa(job #164799)

Utilizator nimeniaPaul Grigoras nimenia Data 24 martie 2008 20:41:22
Problema Dezastru Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
#include <stdio.h>

double a[26],p;
int nr,n,kk;

void bk(int ant, int k, double s){
     
     if (k==kk+1){p+=s;++nr;}
     else for (int i=ant+1;i<=n-(kk-k);i++) bk(i,k+1,s*a[i]);
}
     


int main()
{int i;
 freopen ("dezastru.in","r",stdin);
 freopen ("dezastru.out", "w",stdout);
 scanf("%d%d",&n,&kk);
 for (i=1;i<=n;i++) scanf("%lf", a+i);
 bk(0,1,1);
 p/=nr;
 printf("%lf",p);
 return 0;
}