Cod sursa(job #1717632)

Utilizator mariakKapros Maria mariak Data 15 iunie 2016 13:26:29
Problema Dezastru Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.97 kb
#include <bits/stdc++.h>
#define Dim 27
FILE *fin  = freopen("dezastru.in", "r", stdin);
FILE *fout = freopen("dezastru.out", "w", stdout);

using namespace std;
int n, k, C[Dim][Dim];
double A[Dim][Dim], p[Dim];
void read()
{
    scanf("%d %d", &n, &k);
    for(int i = 1; i <= n; ++ i)
        scanf("%lf", &p[i]);
}
void comb()
{
    int i, j;
    for(i = 0; i <= Dim; ++ i)
        C[i][0] = 1;
    for(i = 1; i <= n; ++ i)
        for(j = 1; j <= k; ++ j)
            C[i][j] = C[i - 1][j - 1] + C[i - 1][j];
}
void solve()
{
    int i, j;
    comb();
    A[1][1] = p[1];
    A[1][0] = 1;
    for(i = 2; i <= n; ++ i)
    {
        A[i][0] = 1;
        for(j = 1; j <= k && j <= i; ++ j)
            A[i][j] = (double)(A[i - 1][j] + A[i - 1][j - 1] * p[i]);
    }
    A[n][k] = (double)(A[n][k] / (double)(C[n][k]));

}
void write()
{
    printf("%.7lf\n", A[n][k]);
}
int main()
{
    read();
    solve();
    write();
    return 0;
}