Cod sursa(job #6880)

Utilizator crawlerPuni Andrei Paul crawler Data 21 ianuarie 2007 10:24:32
Problema Triplete Scor 70
Compilator cpp Status done
Runda preONI 2007, Runda 1, Clasa a 10-a Marime 0.46 kb
#include <stdio.h>

char a[4097][4097];

int main()
 {
  freopen("triplete.in","r",stdin);
  freopen("triplete.out","w",stdout);

  register long i,j,k, n,m, T=0;

  scanf("%ld%ld",&n,&m);

  for(i=1;i<=m;++i)
   {
    scanf("%ld%ld",&j,&k);
    ++a[j][k];
    ++a[k][j];
   }

  for(i=1;i<=n;++i)
   for(j=i+1;j<=n;++j)
    if(a[i][j])
     for(k=j+1;k<=n;++k)
      if(a[i][k] && a[j][k])
       ++T;

  printf("%ld\n",T);


  return 0;
 }