Cod sursa(job #1724405)

Utilizator daniel.grosuDaniel Grosu daniel.grosu Data 3 iulie 2016 01:10:46
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
#include<bits/stdc++.h>
using namespace std;
int A[5000055];
int rs,d,r;
int main(){
   	ifstream cin("pascal.in");
    ofstream cout("pascal.out");
   	
   	cin>>r>>d;
   	for(int i=1; i<=r; ++i)
   	{
   		int aux=i;
   		int a=0;
   		while(aux%d==0)
   			aux/=d, a++;
		A[i]=A[i-1]+a;
	}
	
	int s=A[r];
	for(int i=1; i<=r-1; ++i)
	{
		s=A[r]-(A[i]+A[r-i]);
		if(s>0)
			rs++;
	}
	cout<<rs<<"\n";
   	
    return 0;
}