Cod sursa(job #2342412)

Utilizator alexdumitrescuDumitrescu George Alex alexdumitrescu Data 12 februarie 2019 19:43:17
Problema Pascal Scor 90
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.82 kb
#include <fstream>

#define Nmax 5000001
using namespace std;
ifstream fin ("pascal.in");
ofstream fout ("pascal.out") ;
int r , d , p2 , p3 , p5 , v2[Nmax] , v3[Nmax] , v5[Nmax];
int s = 0 ;
int main()
{

    fin >> r >> d;
    for (int 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 (int 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 ++ ;
    }
    fout << s;
    return 0 ;


}