Cod sursa(job #1085947)

Utilizator OvidiuSabauOvidiu Sabau OvidiuSabau Data 17 ianuarie 2014 16:03:07
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
Raporteaza aceasta sursa 
#include <iostream>
#include <fstream>

using namespace std;
ifstream g("fractii.in");
ofstream h("fractii.out");

int main()
{
int n;
g>>n;
int p=1;
int spa=0;
while (p<=n)
{
int q=1;
while (q<=n)
{
 int d=1;
 int c=0;
 while ((d<=p)&&(d<=q))
 {
     if ((p%d==0)&&(q%d==0)) {c=d;}
     d++;
 }

if (c==1) {spa++;}
q++;
}
p++;
}
h<<spa;
}