Cod sursa(job #2340424)

Utilizator vladadAndries Vlad Andrei vladad Data 10 februarie 2019 14:03:41
Problema Pascal Scor 90
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.65 kb
#include <iostream>
#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;
}