Cod sursa(job #1197270)

Utilizator YoChinezuWeng Mihai Alexandru YoChinezu Data 11 iunie 2014 16:00:41
Problema Pascal Scor 30
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.76 kb
#include <cstdio>

using namespace std;

inline int NoName(int n,int j){
    int cate=0;
    if(j==4){
        j=2;
    }
    if(j==6){
        j=3;
    }
    unsigned long long rr=j;
    while(n>=rr){
        cate+=n/rr;
        rr*=j;
    }
    return cate;
}

int main(){
    freopen("pascal.in", "r", stdin);
    freopen("pascal.out", "w", stdout);
    int r,d,rasp=0;
    scanf("%d%d",&r,&d);
    int a,b;
    for(int i=0;i<=r;++i){
        a=NoName(r,d);
        b=NoName(i,d);
        a=a-b;
        b=NoName(r-i,d);
        a=a-b;
        if(a!=0){
            if(d==4){
                if(a%2==0)
                {
                    ++rasp;
                }
            }else{
                ++rasp;
            }
        }
    }
    printf("%d",rasp);
    return 0;
}