Pagini recente » Cod sursa (job #1172644) | Cod sursa (job #282899) | Profil AngelBeji05 | Infoarena Monthly 2014 - Solutii Runda 6 | Cod sursa (job #1844660)
#include <cstdio>
using namespace std;
int v[5000001];
int main()
{
FILE *fin=fopen ("pascal.in","r");
FILE *fout=fopen ("pascal.out","w");
int r,d,sol,i,nr;
fscanf (fin,"%d%d",&r,&d);
sol=0;
for (i=1;i<=r;i++){
nr=i;
while (nr%d==0){
v[i]++;
nr/=d;
}
v[i]+=v[i-1];
}
for (i=1;i<=r;i++){
if (v[r]-v[r-i]-v[i]>0)
sol++;
}
fprintf (fout,"%d",sol);
return 0;
}