Pagini recente » Cod sursa (job #38095) | Cod sursa (job #913158) | Cod sursa (job #2796083) | Cod sursa (job #2578442) | Cod sursa (job #267733)
Cod sursa(job #267733)
#include <stdio.h>
FILE *f, *g;
long t=0, i, j, v[5000000], r, d, a, b, c;
int main(void)
{
f=fopen("pascal.in", "r");
g=fopen("pascal.out", "w");
fscanf(f, "%ld%ld", &r, &d);
v[1]=1;
for (i=1;i<=r;i++)
{
a=0;
b=0;
c=1;
for (j=1;j<=i+1;j++)
{
a=b;
b=c;
c=v[j+1];
v[j]=a+b;
}
}
for (i=1;i<=r;i++)
if (v[i]%d==0)
t++;
fprintf(g, "%ld", t);
fcloseall();
return 0;
}