Cod sursa(job #1739967)

Utilizator VictoriaNevTascau Victoria VictoriaNev Data 10 august 2016 16:09:31
Problema Pascal Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.78 kb
#include <fstream>

using namespace std;
const int NMAX=5000005;
int s2, s3, s5, sol, v2[NMAX], v3[NMAX], v5[NMAX];
int main()
{
    ifstream in("pascal.in");
    ofstream out("pascal.out");
    int n, d;
    in>>n>>d;
    for(int i=1; i<=n; i++)
    {
        if(i%2==0)
            v2[i]=v2[i/2]+1;
        if(i%3==0)
            v3[i]=v3[i/3]+1;
        if(i%5==0)
            v5[i]=v5[i/5]+1;
    }
    for(int i=1; i<=n; i++)
    {
        s2+=v2[n-i+1]-v2[i];
        s3+=v3[n-i+1]-v3[i];
        s5+=v5[n-i+1]-v5[i];

        if(d==2 && s2>0)
            sol++;
        if(d==3 && s3>0)
            sol++;
        if(d==5 && s5>0)
            sol++;
        if(d==4 && s2>1)
            sol++;
        if(d==6 && s2>0 && s3>0)
            sol++;
    }
    out<<sol<<'\n';
    return 0;
}