Cod sursa(job #1768764)

Utilizator MoleRatFuia Mihai MoleRat Data 1 octombrie 2016 13:53:22
Problema Text Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.76 kb
#include <fstream>
#include <cmath>
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int rez;
int r,c,a[5000010],b[5000010],cc[5000010],c2,c3,c5;
int main()
{
    fin>>r>>c;
    for (int i=2; i<=r; i=i+2)
        a[i]=a[i/2]+1;
    for (int i=3; i<=r; i=i+3)
        b[i]=b[i/3]+1;
    for (int i=5; i<=r; i=i+5)
        cc[i]=cc[i/5]+1;
    for (int k=1;k<r;k++)
    {
        c2+=a[r-k+1]-a[k];
        c3+=b[r-k+1]-b[k];
        c5+=cc[r-k+1]-cc[k];
        if (c==2 && c2)
            rez++;
        if (c==3 && c3)
            rez++;
        if (c==4 && c2>1)
            rez++;
        if (c==5 && c5)
            rez++;
        if (c==6 && c2 && c3)
            rez++;
    }
    fout<<rez;
    return 0;
}