Cod sursa(job #2270177)

Utilizator alexandruilieAlex Ilie alexandruilie Data 27 octombrie 2018 09:53:06
Problema Pascal Scor 100
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.62 kb
#include <fstream>

using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int n,d,i,v2[5000020],v3[5000020],v5[5000020],p2,p3,p5,s;
int main()
{
    f>>n>>d;
    for(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(i=1;i<n;i++)
    {
        p2+=v2[n-i+1]-v2[i];
        p3+=v3[n-i+1]-v3[i];
        p5+=v5[n-i+1]-v5[i];
        if(d==2 &&p2>0) s++;
        if(d==3 &&p3>0) s++;
        if(d==4 &&p2>1) s++;
        if(d==5 &&p5>0) s++;
        if(d==6 &&p2>0&&p3>0) s++;
    }
    g<<s;
    return 0;
}