Cod sursa(job #1900637)
Utilizator | Data | 3 martie 2017 15:29:38 | |
---|---|---|---|
Problema | Pascal | Scor | 40 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.48 kb |
#include<cstdio>
int r,i,j,rand,k,l,re,q,cq,cl,nr,put,pp;
int main ()
{
freopen("pascal.in","r",stdin);
freopen("pascal.out","w",stdout);
scanf("%d%d",&rand,&k);
l=rand+1;
for(i=2;i<=rand+1;i++)
{
l--;
q++;
cl=l;
cq=q;
while(cl%k==0)
{
put++;
cl/=k;
}
while(cq%k==0)
{
put--;
cq/=k;
}
if(put>0&&pp==0||pp==1&&put>1)
nr++;
}
printf("%d",nr);
return 0;
}