Cod sursa(job #1693348)

Utilizator narcios_neculaNarcis Necula narcios_necula Data 22 aprilie 2016 22:17:41
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.86 kb
#include<iostream>
#include<fstream>
using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int n,r,d,nr,s2,s3,s5,i;
char v2[5000005],v3[5000005],v5[5000005];
int main()
{
    f >> r >> d;
    for(i = 1; i <= r; ++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 <= r; ++i)
    {
        s2 += v2[r - i + 1] - v2[i];
        s3 += v3[r - i + 1] - v3[i];
        s5 += v5[r - i + 1] - v5[i];
        if(d == 2 && s2 > 0)
            ++n;
        else
        {
            if(d == 3 && s3 > 0)
                ++n;
            else
            {
                if(d == 5 && s5 > 0)
                    ++n;
            }
        }
    }
    g << n;
    return 0;
}