Cod sursa(job #1620287)

Utilizator NecoaraGabrielNecoara Gabriel-Stefan NecoaraGabriel Data 28 februarie 2016 23:35:00
Problema Pascal Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
//http://www.infoarena.ro/problema/pascal
#include<iostream>
#include<fstream>

using namespace std;
//long long a[5000000];
long long rec(long long x1,long long x2)
{
    if(x2==0||x1==x2)
        return 1;
    else
        return rec(x1-1,x2-1)+rec(x1-1,x2);
}
int main()
{
    short d;
    long long r,nr=0;
    ifstream f("pascal.in");
    ofstream g("pascal.out");

    f>>r;//randul din triunghi
    f>>d;//cate numere sunt divizibile cu d

for(long long j=0;j<=r/2+1;j++)
    if(rec(r,j)%d==0)
    nr++;
    g<<nr;
    return 0;
}