Cod sursa(job #1720008)

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