Cod sursa(job #419875)

Utilizator AndrewXJuduc Paul Andrei AndrewX Data 18 martie 2010 09:27:21
Problema Dezastru Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<stdio.h>
double p,n,k,v[100];
int i,j;
FILE *in=fopen("dezastru.in","rt"),*out=fopen("dezastru.out","wt");
int main()
{
	fscanf(in,"%lf",&n);
	fscanf(in,"%lf",&k);
	for(i=1;i<=n;i++)
		fscanf(in,"%lf",&v[i]);
	for(i=1;i<=n;i++)
		for(j=1;j<=n;j++)
			if(i!=j)
				p+=(v[i]*v[j])/6;
	fprintf(out,"%.6lf",p);
	return 0;
}