Cod sursa(job #346417)

Utilizator razvan_emPrecupas Razvan razvan_em Data 7 septembrie 2009 19:08:27
Problema Triplete Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include <fstream>
using namespace std;
ofstream ofis("triplete.out");
ifstream ifis("triplete.in");
int a[67000][6900],n,m,i,nr,x,y,j,k,ap[67000][6700];

int main()
{
    ifis>>n>>m;
    for (i=1; i<=m; i++)
    { ifis>>x>>y; a[x][++a[x][0]]=y; ap[x][y]=1;}
    for (i=1; i<=n; i++)
    for (j=1; j<=a[i][0]; j++)
    for (k=1; k<=a[j][0]; k++)
    if (ap[i][a[i][j]] || ap[a[i][j]][i]) nr++;
    ofis<<nr;
    return 0;
}