Cod sursa(job #797468)

Utilizator dariusdariusMarian Darius dariusdarius Data 14 octombrie 2012 08:58:58
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
#include<stdio.h>
int pdn[5000005];
int main()
{
	freopen("pascal.in","r",stdin);
	freopen("pascal.out","w",stdout);
	int r,d,i,t,nr;
	scanf("%d%d",&r,&d);
	for(i=1;i<=r;i++)
		if(i%d==0) pdn[i]=pdn[i/d]+1;
		else       pdn[i]=0;
	t=0;nr=0;
	for(i=1;i<=r;i++)
	{
		t=t+pdn[r+1-i]-pdn[i];
		if(t>0) nr++;
	}
	printf("%d\n",nr);
	return 0;
}