Pagini recente » Cod sursa (job #202795) | Cod sursa (job #2175296) | Cod sursa (job #2630195) | Cod sursa (job #2520630) | Cod sursa (job #58588)
Cod sursa(job #58588)
#include<stdio.h>
int main()
{long p,i,j,ii,ij,jj,d,sol=0,var;
FILE*f=fopen("pascal.in","r");
FILE*g=fopen("pascal.out","w");
fscanf(f,"%ld %ld",&i,&d);
if (d==4) {d=2;var=1;}
else var=0;
//i!/(i-j)!*j!
if (d==2||d==3||d==5||d==4)
{
p=d;
ii=0;
while(i/p!=0) {ii+=i/p; p*=d;}
for(j=1;j<=i;j++)
{
jj=0; p=d;
while (j/p!=0){jj+=(j/p); p*=d;}
ij=0; p=d;
while((i-j)/p!=0) {ij+=(i-j)/p; p*=d;}
if ((ii-ij-jj>var)) sol++;
}}
fprintf(g,"%ld",sol);
}