Cod sursa(job #2564686)
Utilizator | Data | 2 martie 2020 09:17:33 | |
---|---|---|---|
Problema | Pascal | Scor | 20 |
Compilator | cpp-32 | Status | done |
Runda | Arhiva de probleme | Marime | 0.46 kb |
#include<bits/stdc++.h>
using namespace std;
int fact(int x)
{
int p=1,i;
if(x==0)
return 1;
else
{
for(i=1;i<=x;i++)
p=p*i;
return p;
}
}
int main()
{
ifstream f("pascal.in");
ofstream g("pascal.out");
int r,d,nr=0,j=0,rez;
f>>r>>d;
while(j!=r)
{
rez=fact(r)/((fact(r-j))*fact(j));
if(rez%d==0)
nr++;
j++;
}
g<<nr;
return 0;
}