Cod sursa(job #2742838)

Utilizator iuliatarnaIulia Tarna iuliatarna Data 21 aprilie 2021 22:58:21
Problema Fractii Scor 0
Compilator c-64 Status done
Runda Arhiva de probleme Marime 0.57 kb
#include <stdio.h>

void main () {

    FILE *f_in, *f_out;

    f_in=fopen ("fractii.in", "r");
    f_out=fopen("fractii.txt", "w");
   
    int n,p,q,m1,m2,s=0;
    fscanf (f_in,"%d", &n);
    for (p=1; p<n+1; p++){
        for (q=1; q<n+1; q++){
            if (p==1) {s=n; q=n;} else {
                if (q==1) s=s+1; else
                if (q<p) {if (p%q!=0) s=s+1;} else
                if (p<q) {if (q%p!=0) s=s+1;}  
                    
            }   
        }
    }
    
    fprintf (f_out, "%d", s);
    
    fclose(f_in);
    fclose(f_out);
}