Cod sursa(job #9072)

Utilizator DranaXumAlexandru Dumitru Paunoiu DranaXum Data 26 ianuarie 2007 16:49:15
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include <fstream.h>

int cmmdc(int a,int b)
{
while(a!=b)
 if(a>b) a-=b;
 else b-=a;
if(a==1) return 1;
else return 0;
}

int main()
{
int x,n,i,j;
ifstream fin("fractii.in");
fin>>n;
fin.close();
x=0;
for(i=1;i<=n-1;i++)
for(j=i+1;j<=n;j++)
if(cmmdc(i,j)) x++;
ofstream fout("fractii.out");
fout<<n*n-(n-1)-2*x;
fout.close();
return 0;
}