Cod sursa(job #2148515)

Utilizator ovidius11Stiriu Ovidius ovidius11 Data 1 martie 2018 19:30:23
Problema Pascal Scor 50
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.56 kb
#include<cstdio>
int calc(int n,int p){
int rez=0,cp=p;
while(n>=p)
rez=rez+n/p,p=p*cp;
return rez;}
int main(){
freopen("pascal.in","r",stdin);
freopen("pascal.out","w",stdout);
int r,d,i,cnt=0;
scanf("%d%d",&r,&d);
for(i=0;i<r/2+1;i++){
if (d==2 || d==3 || d==5){
if (calc(r,d)-calc(i,d)-calc(r-i,d)>=1)
cnt++;}
if (d==4){
if (calc(r,2)-calc(i,2)-calc(r-i,2)>=2)
cnt++;}
if (d==6){
if (calc(r,2)-calc(i,2)-calc(r-i,2)>=1 && calc(r,3)-calc(i,3)-calc(r-i,3)>=1)
cnt++;}}
if (r%2==0)
printf("%d\n",cnt*2-1);
else
printf("%d\n",cnt*2);
return 0;}