Cod sursa(job #128262)

Utilizator dariusoonul darius dariuso Data 26 ianuarie 2008 19:05:17
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<fstream>
using namespace std;
int prime(int a,int b)
{  int k;
   for(k=2;k<=a;k++)
   if((a%k==0)&&(b%k==0)) return 0;
   return 1;
   }
int main()
{int N,P,Q,contor=0;
ifstream f("fractii.in");
f>>N;
f.close();
for(P=1;P<=N;P++)
for(Q=1;Q<=N;Q++)
if (prime(P,Q)) contor++;
ofstream g("fractii.out");
g<<contor;
g.close();
system ("pause");
}