Cod sursa(job #2910709)

Utilizator biancalautaruBianca Lautaru biancalautaru Data 24 iunie 2022 15:31:35
Problema Pascal Scor 100
Compilator cpp-64 Status done
Runda 3_iulie Marime 0.91 kb
#include <fstream>
#define DIM 5000001
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int n,k,i,c2,c3,c5,cnt,d[DIM],t[DIM],c[DIM];
int main() {
    fin>>n>>k;
    for (i=2;i<=n;i++) {
        if (i%2==0)
            d[i]=1+d[i/2];
        if (i%3==0)
            t[i]=1+t[i/3];
        if (i%5==0)
            c[i]=1+c[i/5];
    }
    for (i=1;i<=n;i++) {
        c2+=d[n-i+1]-d[i];
        c3+=t[n-i+1]-t[i];
        c5+=c[n-i+1]-c[i];
        if (k==2 && c2!=0)
            cnt++;
        else
            if (k==3 && c3!=0)
                cnt++;
            else
                if (k==4 && c2>1)
                    cnt++;
                else
                    if (k==5 && c5!=0)
                        cnt++;
                    else
                        if (k==6 && c2!=0 && c3!=0)
                            cnt++;
    }
    fout<<cnt;
    return 0;
}