Cod sursa(job #3250989)

Utilizator MafteiDavidAndreiMaftei David-Andrei MafteiDavidAndrei Data 24 octombrie 2024 14:04:13
Problema Pascal Scor 0
Compilator cpp-64 Status done
Runda cex_1 Marime 0.34 kb
Raporteaza aceasta sursa 
 #include <fstream>

using namespace std;
ifstream cin ("pascal.in");
ofstream cout("pascal.out");
int v[5000005],r,d,nr;
int main()
{
    v[1]=1;
    cin>>r>>d;
    for (int i=1;i<r;i++){
        for (int j=1;j<=i;j++)v[j]=v[j]+v[j-1];
    }
    for (int i=1;i<=r;i++)
        if(v[i]%d==0)nr++;
    cout<<nr;
    return 0;
}