Cod sursa(job #690050)
| Utilizator | Data | 25 februarie 2012 09:38:15 | |
|---|---|---|---|
| Problema | Fractii | Scor | 10 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.39 kb |
#include <fstream>
using namespace std;
int ired(int p, int q)
{int a, b, ok=1;
a=p; b=q;
while(a!=b){
if(a>b)a=a-b;
else b=b-a;}
if(a!=1)ok=0;
return ok;}
int main ()
{int nr;
long n, i, j;
ifstream f("fractii.in");
ofstream g("fractii.out");
f>>n;
nr=0;
for(i=1; i<=n; i++)
for(j=1; j<=n; j++){
if(ired(i, j)==1)nr++;}
g<<nr;
f.close ();
g.close ();
return 0;}