Cod sursa(job #1205783)

Utilizator tudi98Cozma Tudor tudi98 Data 8 iulie 2014 04:02:44
Problema Pascal Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.6 kb
#include <fstream>
using namespace std;

int pow(int n,int d){
    int p=0;
    while(n%d==0){
        n/=d;
        p++;
    }
    return p;
}

int main(){

    ifstream f("pascal.in");
    ofstream g("pascal.out");

    int r,d;
    f >> r >> d;
    int *app_f = new int[r+1];
    app_f[0]=0;
    for(int i=1;i<=r;i++){
        app_f[i]=app_f[i-1]+i/d;
    }
    int div=0;
    for(int i=1;i<=r/2;i++){
        if(app_f[r]>app_f[r-i]+app_f[i]) div++;
    }
    div<<=1;
    if(!(r&1) && app_f[r/2]*2<app_f[r]) div--;
    delete[] app_f;
    g << div <<"\n";
    return 0;
}