Pagini recente » Cod sursa (job #1406556) | Cod sursa (job #1671408) | Cod sursa (job #940509) | Cod sursa (job #513783) | Cod sursa (job #32399)
Cod sursa(job #32399)
#include<iostream.h>
#include<fstream.h>
main()
{
unsigned long i,j,n,m;
long long s,s2,s3,d,k,p,delta,ij;
fstream f("pascal.in",ios::in);
fstream g("pascal.out",ios::out);
f>>i;
f>>d;
j=0;
delta=0;
do{
ij=i-j;
s=0;p=d;
do{
s+=i/p;
p*=d;
}while(p<=i);
s2=0;p=d;
do{
s2+=ij/p;
p*=d;
}while(p<=ij);
p=d;s3=0;
do{
s3+=j/p;
p*=d;
}while(p<=j);
s2+=s3;
s-=s2;
if(s>=1)delta++;
j++;
}while(j<=i);
g<<delta;
return 0;
}