Cod sursa(job #162131)

Utilizator anamaria1Ozorchevici Ana Maria anamaria1 Data 19 martie 2008 15:21:36
Problema Dezastru Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<fstream.h>
#include<iomanip.h>
long double v[26],sum,p;
int main()
{ifstream f("dezastru.in");
ofstream g("dezastru.out");
int n,k,i,j,l;
f>>n>>k;
for(i=1;i<=n;i++) f>>v[i];
f.close();
for(i=1;i<n;i++)
 {p=v[i];
  for(j=i+1,l=2;l<=k;j++,l++)
    p=p*v[j];
  sum=sum+p;
  for(j=i+2;j<=n;j++)
   {p=p/v[j-1]*v[j+k-2];
    sum=sum+p;
   }
 }
cout<<sum<<'\n';
sum=sum/(((n-1)*n)/2);
g<<setprecision(6)<<sum<<'\n';
g.close();
return 0;
}