Cod sursa(job #229092)
Utilizator | Data | 9 decembrie 2008 09:13:59 | |
---|---|---|---|
Problema | Fractii | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.46 kb |
#include "fstream.h"
long prim(long a,long b)
{
int rest;
while ( b )
{
rest = a % b;
a = b;
b = rest;
}
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;
}