Pagini recente » Borderou de evaluare (job #1739904) | Borderou de evaluare (job #2783174) | Borderou de evaluare (job #1260571) | Cod sursa (job #1194905) | Cod sursa (job #921703)
Cod sursa(job #921703)
#include<stdio.h>
long N;
int lnko(long a,long b)
{
long s;
while ( a != 0 )
{
s = a;
a = b%a;
b = s;
}
return b;
}
int main()
{
int sz;
FILE*f=fopen("fractii.in","rt");
fscanf(f,"%ld",&N);
for(long i=1;i<=N;i++)
{
for(long j=1;j<=N;j++)
{
if(lnko(i,j)==1 && i>=1)
sz++;
}
}
FILE*g=fopen("fractii.out","wt");
fprintf(g,"%ld",sz);
return 0;
}