Cod sursa(job #2026842)

Utilizator ruxandra_lutanRuxandra Lutan ruxandra_lutan Data 25 septembrie 2017 10:32:26
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <stdio.h>
#include <stdlib.h>

long cmmdc(long a, long b) {
    while(a != b)
        if(a > b) a = a - b;
            else b = b - a;
    return a;
}

int main()
{
    FILE *in = fopen("fractii.in", "r");
    FILE *out = fopen("fractii.out", "w");
    long n, p, q, nr;

    fscanf(in, "%ld", &n);
    nr = 0;
    for(p = 1; p <= n; p++) {
        for(q = 1; q <= n; q++) {
            if(cmmdc(p,q) == 1) {
                nr++;
            }
        }
    }

    fprintf(out, "%ld", nr);

    return 0;
}