Cod sursa(job #116140)
Utilizator | Pantelimon Laurentiu panlau | Data | 17 decembrie 2007 21:07:58 |
---|---|---|---|
Problema | Fractii | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.38 kb |
#include <fstream.h>
unsigned long int n,i,j,r,a,b,nr;
ifstream f("fractii.in");
ofstream g("fractii.out");
int main()
{
f>>n;
f.close();
nr=0;
for(i=1;i<n;i++)
for(j=i;j<=n;j++)
{
a=i;b=j;
r=a%b;
while(r!=0)
{
a=b;
b=r;
r=a%b;
}
if(b==1)
if(i!=j)
nr=nr+2;
else
nr++;
}
g<<nr;
g.close();
return 0;
}