Cod sursa(job #7000)

Utilizator g3ppyStoian Vlad g3ppy Data 21 ianuarie 2007 11:36:12
Problema Triplete Scor 0
Compilator cpp Status done
Runda preONI 2007, Runda 1, Clasa a 10-a Marime 0.48 kb
#include <fstream.h>
#define Max 500
int main()

{unsigned int m,n,tri,x,y,i,j,k;
int a[Max][Max];

ifstream f("triplete.in");
f>>n>>m;
f.close();
for (i=0;i<m;i++)
    {f>>x>>y;
     a[x][y]=1;
     a[y][x]=1;
    }
j=0;
tri=0;
for(i=1;i<=n;i++)
   {if (a[i][j]==1)
       {for (k=1;k<=n;k++)
	    {
	    if (k!=i&&a[j][k]==1)
               if (a[k][i]==1) tri++;
	    }
       }
   j++;
   }
ofstream g("triplete.out");
g<<tri/2<<'\n';
g.close();
return 0;
}