Cod sursa(job #829205)

Utilizator Vally77FMI Calinescu Valentin Gelu Vally77 Data 4 decembrie 2012 22:11:52
Problema Fractii Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.82 kb
#include <iostream>
#include <math.h>
#include <fstream>
using namespace std;
char a[1000005];
int divizori[10000];
int i,n,s,r,t;
int main()
{
    ifstream ka("fractii.in");
    ofstream ki("fractii.out");
    ka>>n;
    for(i=2;i<=n;i++)
    {
        t=i;
        for(int g=2;g<=t;g++)
        {
            if(t%g==0)
            {
                while(t%g==0)
                {t=t/g;}
                divizori[r]=g;
                r++;
            }
        }
        r--;
        while(r>=0)
        {
            for(int l=divizori[r];l<=n;l=l+divizori[r])
        {
            a[l]=1;
        }
        divizori[r]=0;
        r--;
        }
        r++;
        for(int f=1;f<=n;f++)
        {
            if(a[f]==0)
            {s++;
            }
            else
            a[f]=0;
        }
    }
    s=s+n;
    ki<<s;
}