Pagini recente » Cod sursa (job #2430380) | Cod sursa (job #1304423) | Cod sursa (job #2364298) | Cod sursa (job #2892138) | Cod sursa (job #9399)
Cod sursa(job #9399)
#pragma option -3 -a -Z -O2 -r
#include<fstream.h>
unsigned long n;
int nrprime(unsigned long x,unsigned long y)
{unsigned long r;
do
{r=x%y;
x=y;
y=r;
}
while(r);
if(x==1) return 1;
else return 0;
}
int main()
{unsigned long i,j,c=0;
ifstream f("fractii.in");
ofstream g("fractii.out");
f>>n;
//cout<<"n="; cin>>n;
f.close();
for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
if(nrprime(i,j)) c++;
//cout<<c<<'\n';
g<<c<<'\n';
g.close();
return 0;
}