Cod sursa(job #3205275)
Utilizator | Data | 19 februarie 2024 10:05:06 | |
---|---|---|---|
Problema | Pascal | Scor | 10 |
Compilator | cpp-64 | Status | done |
Runda | Arhiva de probleme | Marime | 0.43 kb |
#include<fstream>
using namespace std;
ifstream F("pascal.in");
ofstream G("pascal.out");
int n,m,i,k,c,j;
int main()
{
for(F>>n>>m,i=1;i<n/2;++i) {
for(j=n-i+1;j%m==0;j/=m,++c);
for(j=i;j%m==0;j/=m,--c);
if(c>0)
k+=2;
}
if(!(n&1)) {
for(j=n-n/2+1;j%m==0;j/=m,++c);
for(j=n/2;j%m==0;j/=m,--c);
if(c>0)
++k;
}
return G<<k,0;
}