Cod sursa(job #281510)
Utilizator | Data | 15 martie 2009 10:31:55 | |
---|---|---|---|
Problema | Fractii | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.37 kb |
#include<fstream.h>
long prime(long a,long b)
{
while(a!=b)
{
if(a<b)
b-=a;
if(a>b)
a-=b;
}
if(a==1)
return 1;
else return 0;
}
int main()
{
int k,i,j,s=0;
ifstream f("fractii.in");
f>>k;
f.close();
for(i=1;i<=k;i++)
for(j=1;j<=k;j++)
if(prime(i,j)==1)
s++;
ofstream g("fractii.out");
g<<s;
g.close();
return 0;
}