Cod sursa(job #1118513)

Utilizator pintebogdanPinte Bogdan pintebogdan Data 24 februarie 2014 11:44:05
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include <fstream>
 using namespace std;

 ifstream fin ("fractii.in");
 ofstream fout("fractii.out");

 int prim (int a, int b)
 {int ok,c;
    while (b)
        {c=a%b;
         a=b;
         b=c;
        }
    if(a==1) ok=1;
    else ok=0;
    return ok;
 }

 int main()
 {int n,j,i,k=0;
    fin>>n;
    for (i=1;i<=n;i++)
        {for(j=1;j<=n;j++)
         if(prim(i,j)==1) k++;
        }
    fout<<k;
 }