Cod sursa(job #229085)
| Utilizator |  Radu Lucian Andrei frumushel |
Data | 9 decembrie 2008 08:05:45 |
|---|---|---|---|
| Problema | Fractii | Scor | 10 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.33 kb |
#include "fstream.h"
long prim(long a,long b)
{
while(a!=b)
{if(a>b)a-=b;
else b-=a;
}
if(a==1)return 1;
else return 0;
}
int main()
{
long n,nr=0;
ifstream f("fractii.in");
ofstream g("fractii.out");
f>>n;
for(long i=1;i<=n;i++)
for(long j=1;j<=n;j++)
if(prim(i,j))nr++;
g<<nr;
f.close();
g.close();
return 0;
}