Cod sursa(job #1868841)

Utilizator dragos.galeteanu2001Dragos Iulian dragos.galeteanu2001 Data 5 februarie 2017 13:16:58
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
#include <fstream>
using namespace std;
ifstream f1("fractii.in");
ofstream f2("fractii.out");
int N,P,Q,D,I,R,x,k=0;
int main()
{ f1>>N;
for (P=1; P<=N; P++)
for (Q=1; Q<=N; Q++)
{ D=P; I=Q; R=D%I;
while (R)
{ D=I; I=R; R=D%I; }
x=I;
if (x==1) k++;
}
f2<<k;
f1.close();
f2.close();
return 0; }