Cod sursa(job #3205286)

Utilizator BlaugranasEnal Gemaledin Blaugranas Data 19 februarie 2024 10:27:31
Problema Pascal Scor 0
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.46 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>>1)+(n&1);++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;
        G<<i<<' '<<c<<'\n';
    }
    if(!(n&1)) {
        for(j=n-i+1;j%m==0;j/=m,++c);
        for(j=i;j%m==0;j/=m,--c);
        if(c>0)
            ++k;
    }
    return G<<k,0;
}