Cod sursa(job #409273)

Utilizator RbkPlaYNume complet RbkPlaY Data 3 martie 2010 15:46:09
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.4 kb
#include<fstream>
#include<vector>
using namespace std;
int N,P,Q,k;

int cmmdc(int a, int b){
while(a!=0)
{
           int r;
           r=b%a;
           b=a;
           a=r;} return b;}
int main()
{
    ifstream fin("fractii.in");
    ofstream fout("fractii.out");
    fin>>N;
    for(P=1;P<=N;P++)
    for(Q=1;Q<=N;Q++)

    if(cmmdc(P,Q)==1) k++;

    fout<<k;
    return 0;
}