Cod sursa(job #2410679)

Utilizator alex1234romaniaFurtuna-Cola Andrei-Alexandru alex1234romania Data 20 aprilie 2019 11:27:56
Problema Pascal Scor 100
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.91 kb
#include <fstream>

using namespace std;

ifstream f("pascal.in");
ofstream g("pascal.out");

int r,d,i,v2[5000001],v3[5000001],v5[5000001],p2,p3,p5,s;

int main()
{
    f>>r>>d;
    for(i=1; i<=r; i++)
    {
        if (i % 2 == 0)
        {
            v2[i] = 1 + v2[i/2];
        }
        if (i % 3 == 0)
        {
            v3[i] = 1 + v3[i/3];
        }
        if (i % 5 == 0)
        {
            v5[i] = 1 + v5[i/5];
        }
    }
    for(i=1; i<=r; i++)
    {
        p2 += v2[r-i+1] - v2[i];
        p3 += v3[r-i+1] - v3[i];
        p5 += v5[r-i+1] - v5[i];
        if (d == 2 && p2 > 0)
            s ++ ;
        else if (d == 3 && p3 > 0)
            s ++ ;
        else if (d == 4 && p2 > 1)
            s ++ ;
        else if (d == 5 && p5 > 0)
            s ++ ;
        else if (d == 6 && p2 > 0 && p3 > 0)
            s ++ ;
    }
    g<<s;
    return 0;
}