Cod sursa(job #1337606)
Utilizator | Data | 9 februarie 2015 11:46:52 | |
---|---|---|---|
Problema | Pascal | Scor | 40 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.45 kb |
#include<cstdio>
int r,i,j,rand,k,l,re,put,q,cq,cl,nr;
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;i++)
{
l--;
q++;
cl=l;
cq=q;
while(cl%k==0)
{
put++;
cl/=k;
}
while(cq%k==0)
{
put--;
cq/=k;
}
if(put>0)
nr++;
}
printf("%d",nr);
return 0;
}