Cod sursa(job #2180322)

Utilizator AlexandruabcdeDobleaga Alexandru Alexandruabcde Data 20 martie 2018 19:50:29
Problema Pascal Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.93 kb
#include <fstream>

using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int div2[5000005],div3[5000005],div5[5000005],rand,div,i,z1,z2,z3,sol;
int main()
{
    f>>rand>>div;
    for (i=2; i<=rand; i++)
    {
        if (i%2==0) div2[i]=div2[i/2]+1;
        if (i%3==0) div3[i]=div3[i/3]+1;
        if (i%5==0) div5[i]=div5[i/5]+1;
    }
    for (i=1; i<=rand; i++)
    {

        z1=z1+div2[rand-i+1]-div2[i];
        z2=z2+div3[rand-i+1]-div3[i];
        z3=z3+div5[rand-i+1]-div5[i];
        if(div==2 && z1>0)
        {
            sol++;
        }
        else if(div==3 && z2>0)
        {
            sol++;
        }
        else if(div==4 && z1>1)
        {
            sol++;
        }
        else if(div==5 && z3>0)
        {
            sol++;
        }
        else if(div==6 && z1>0 && z2>0)
        {
            sol++;
        }
    }
    g<<sol<<'\n';
    return 0;
}