Cod sursa(job #8622)

Utilizator wazupPricop Mircea wazup Data 25 ianuarie 2007 09:54:53
Problema Triplete Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include <fstream.h>
char a[4095][4096];
int x,y,m,n,nr=0,i,j,k;
int main()
{
ifstream fin("triplete.in");
ofstream fout("triplete.out");
fin>>n>>m;
for (i=0;i<m;i++)
  {fin>>x>>y;
   a[x][y]=a[y][x]=1;
   }
for (i=1;i<=n;i++)
 for (j=1;j<=n;j++)
    for (k=j+1;k<=n;k++)
      if (a[i][j]==a[i][k]==1&&a[j][k]==1)
	{ nr++;
	  if (nr%3==0)
	   nr/=3;}
fout<<nr<<'\n';
return 0;
}