Pagini recente » Cod sursa (job #1441136) | Cod sursa (job #3032678) | Borderou de evaluare (job #1941569) | Cod sursa (job #428156) | Cod sursa (job #634959)
Cod sursa(job #634959)
#include<stdio.h>
FILE *f, *g;
long long r , d , nr , nums , numd , rez , aux ;
void citire();
void solve();
void tipar();
int main()
{
citire();
solve();
tipar();
return 0;
}
void citire()
{
f=fopen("pascal.in" , "r");
fscanf(f , "%lld%d" , &r , &d );
fclose(f);
}
void solve()
{
for( int i = 2 ; i<= r ; ++i )
{
if(i % d)
continue;
aux = i;
while(aux % d == 0)
{
nr ++;
aux/=d;
}
}
nums = nr;
long long x = r;
for(int j = 1 ;j<x;++j)
{
aux = r;
while(aux % d==0){
nums--;
aux/=d;
}
r--;
aux = j;
while(aux%d==0)
{
numd++;
aux/=d;
}
if(nr-nums-numd > 0)
rez++;
}
}
void tipar()
{
g=fopen("pascal.out" , "w");
fprintf(g,"%lld" , rez );
fclose(g);
}