Cod sursa(job #23028)

Utilizator za_wolfpalianos cristian za_wolf Data 27 februarie 2007 22:28:08
Problema Triplete Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include<stdio.h>
long x,y,s[5000],a,n,m,j,k,l,i,q,w,z;
long fact(long x)
{
long i,s;
if (x==0) return 1;
s=1;
for (i=1;i<=x;i++)
s=s*i;
return s;
}
int main()
{
freopen("triplete.in","r",stdin);
freopen("triplete.out","w",stdout);
scanf("%ld%ld",&n,&m);
for (i=1;i<=m;i++)
{
scanf("%ld%ld",&x,&y);
s[x]++;
s[y]++;
}
q=0;
for (i=1;i<=n;i++)
if (s[i]>=3) q=q+((fact(s[i])/fact(s[i]-3))/fact(3));
printf("%ld",q);
printf("\n");
return 0;
}