Cod sursa(job #1052673)

Utilizator bt.panteaPantea Beniamin bt.pantea Data 11 decembrie 2013 17:41:06
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.57 kb
#include <iostream>
#include <fstream>
using namespace std;
ifstream fin ("fractii.in");
ofstream fout ("fractii.out");
int n,i,j,r,k,a,b;
int main()
{
    fin>>n;
    for (i=1;i<=n;i++)
        {
            for (j=1;j<=n;j++)
                {
                    r=i%j;
                    a=i; b=j;
                    while (r!=0)
                        {
                            a=b;
                            b=r;
                            r=a%b;
                        }
                    if (b==1) k++;
                }
        }
    fout<<k;
    return 0;
}