Cod sursa(job #1560522)

Utilizator liquidskyrusti paula liquidsky Data 2 ianuarie 2016 19:59:16
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.64 kb
#include <iostream>
#include <fstream>
using namespace std;

bool sunt_prime (long a, long b)
{
    long r;
    while (b!=0)
    {r=a%b;
    a=b;
    b=r;
    }
    if (a==1)
    return true;
    else
    return false;
}


int main()
{
    ifstream f("fractii.in");
    long numa, numi,rezult;
    long n;
    f>>n;
    f.close();
    rezult=0;
    for (numa=1 ; numa<=n; numa++)
    {
        for (numi=1; numi<=n; numi++){
            if (sunt_prime(numa, numi)==true)
                {
                    rezult ++;
            }
        }
    }
    ofstream g("fractii.out");
    g<<rezult;
    g.close();
}