結果

問題 No.2326 Factorial to the Power of Factorial to the...
ユーザー Naoto Fujiwara
提出日時 2023-05-29 14:32:17
言語 C++14
(gcc 13.3.0 + boost 1.87.0)
結果
AC  
実行時間 4 ms / 2,000 ms
コード長 1,092 bytes
コンパイル時間 1,029 ms
コンパイル使用メモリ 82,584 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-12-28 09:52:51
合計ジャッジ時間 2,277 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 20
権限があれば一括ダウンロードができます

ソースコード

diff # 

#include<iostream>
#include<set>
#include<algorithm>
#include<vector>
#include<string>
#include<set>
#include<map>
#include<numeric>
#include<queue>
#include<tuple>
#include<cmath>
using namespace std;
typedef long long ll;
const ll INF=1LL<<60;
typedef pair<int,int> P;
typedef pair<int,P> PP;
const ll MOD=1e9+7;

ll mod_pow(ll x,ll y,ll mod){
    ll res=1;
    while(y>0){
        if(y&1){
            res*=x;
            res%=mod;
        }
        x*=x;
        x%=mod;
        y/=2;
    }
    return res;
}

//legendre

//n!をpで割れる回数
ll Legendre(ll n,ll p,ll mod){
    ll res=0;
    while(n>0){
        res+=(n/p)%mod;
        res%=mod;
        n/=p;
    }
    return res;
}

//n!のmod 
ll factorial(ll n,ll mod){
    ll res=1;
    for(ll t=1;t<=n;t++){
        res*=t%mod;
        res%=mod;
    }
    return res;
}

int main(){
    ll N,P;
    cin>>N>>P;

    ll y=factorial(N,MOD-1);//N!=x(MOD-1)+y 
    ll a=factorial(N,MOD);
    ll ay=mod_pow(a,y,MOD);//a^y

    ll cnt=Legendre(N,P,MOD);
    //cout<<"cnt="<<cnt<<endl;

    ll ans=cnt*ay%MOD;
    cout<<ans<<endl;


}
0