Cod sursa(job #1720004)

Utilizator RaduMirceaAndreiRadu Mircea Andrei RaduMirceaAndrei Data 20 iunie 2016 21:35:27
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
# include <fstream>
# define DIM 5000010
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int v[DIM],n,d,i,p,nr;
int main () {
    fin>>n>>d;
    for(i=0;i<=n;i++){
        p=d;
        while(p<=i){
            v[i]+=i/p;
            p*=d;
        }
    }
    for(i=0;i<=n;i++){
        if(v[n]>v[i]+v[n-i])
            nr++;
    }
    fout<<nr<<"\n";
    return 0;
}