Cod sursa(job #2183671)

Utilizator valentin12Valentin Ion Semen valentin12 Data 23 martie 2018 12:37:29
Problema Pascal Scor 90
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.88 kb
#include <fstream>

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

        z1=z1+d2[lin-i+1]-d2[i];
        z2=z2+d3[lin-i+1]-d3[i];
        z3=z3+d5[lin-i+1]-d5[i];
        if(d==2 && z1>0)
        {
            sol++;
        }
        else if(d==3 && z2>0)
        {
            sol++;
        }
        else if(d==4 && z1>1)
        {
            sol++;
        }
        else if(d==5 && z3>0)
        {
            sol++;
        }
        else if(d==6 && z1>0 && z2>0)
        {
            sol++;
        }
    }
    g<<sol<<'\n';
    return 0;
}