Pagini recente » Cod sursa (job #2015871) | Statistici Daraban Albert Timotei (Earthbert) | Monitorul de evaluare | Istoria paginii utilizator/34andreea12 | Cod sursa (job #2510138)
#include <cstdio>
//ofstream fout ("fractii.out");
//ifstream fin ("fractii.in");
int p, q, n, k, r;
int main()
{
freopen("fractii.in","r",stdin);
freopen("fractii.out","w",stdout);
scanf ("%d", &n);
for(p=1; p<=n;p++)
for(q=1;q<=n; q++)
{
if(p<q)
{
while(p != 0)
{
r = q % p;
q = p;
p = r;
}
if(q==1)
k++;
}
if(p>q)
{
while(q != 0)
{
r = p % q;
p = q;
q = r;
}
if(p==1)
k++;
}
if(p==1 && q==1)
k++;
}
printf("%d", &k);
// fin.close ();
// fout.close ();
fclose(stdin);
fclose(stdout);
return 0;
}