Cod sursa(job #1587474)

Utilizator anderut22Sandu Andrei anderut22 Data 2 februarie 2016 08:54:46
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.6 kb
#include <fstream>
using namespace std;
ifstream fin("fractii.in");
ofstream fout("fractii.out");
int main()
{
    int n, S, k, i, p, ok;
    fin >> n;
    S=n*n;
    for (k=2; k<=n; k++){
        for (i=1; i<=n; i++){
            ok=1;
            if ((i!=1)&&((k%i==0)||(i%k==0))){
                S--;
                ok=0;
            }
            p=2;
            while ((p<=n)&&(ok==1)){
                if ((i%p==0)&&(k%p==0)){
                    S--;
                    break;
                }
                p++;
            }
        }
    }
    fout << S;
    return 0;
}