Cod sursa(job #2038569)

Utilizator aturcsaTurcsa Alexandru aturcsa Data 13 octombrie 2017 20:03:17
Problema Dezastru Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.85 kb
#include <iostream>
#include <fstream>
using namespace std;
ifstream fin("dezastru.in");
ofstream fout("dezastru.out");
int stc[10001],f[100],n,k,l=1;
double a[100],xd[100],xr,sum;
void permutare(int nivel)
{
    if(nivel==k+1)
    {
        xr=1;
        for(int i=1; i<=k; i++)
        {
            //cout<<stc[i]<<" ";
            xr*=a[stc[i]];
        }
        //cout<<xr;
        xd[l]=xr;
        l++;
        //cout<<"\n";
        return;
    }
    for(int i=1; i<=n; i++)
    {
        if(f[i]==0)
        {
            f[i]=1;
            stc[nivel]=i;
            permutare(nivel+1);
            f[i]=0;
        }

    }
}

int main()
{
    fin >>n>>k;
    for(int i=1; i<=n; i++)
        fin>>a[i];
    permutare(1);
    for(int i=1;i<=l;i++)
    {
        sum+=xd[i];
    }
    fout<<sum/(l-1);
    return 0;
}