結果

問題 No.644 G L C C D M
ユーザー Lepton_sLepton_s
提出日時 2018-02-02 22:24:46
言語 C++17
(gcc 12.3.0 + boost 1.83.0)
結果
WA  
実行時間 -
コード長 2,705 bytes
コンパイル時間 914 ms
コンパイル使用メモリ 118,068 KB
実行使用メモリ 6,948 KB
最終ジャッジ日時 2024-06-10 01:21:37
合計ジャッジ時間 1,834 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge1
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
6,816 KB
testcase_01 AC 2 ms
6,940 KB
testcase_02 AC 2 ms
6,944 KB
testcase_03 AC 2 ms
6,944 KB
testcase_04 AC 1 ms
6,944 KB
testcase_05 AC 1 ms
6,940 KB
testcase_06 WA -
testcase_07 AC 1 ms
6,940 KB
testcase_08 WA -
testcase_09 AC 2 ms
6,940 KB
testcase_10 AC 1 ms
6,944 KB
testcase_11 WA -
testcase_12 AC 2 ms
6,944 KB
testcase_13 WA -
testcase_14 WA -
testcase_15 AC 1 ms
6,944 KB
testcase_16 AC 2 ms
6,940 KB
testcase_17 AC 2 ms
6,940 KB
testcase_18 AC 3 ms
6,944 KB
testcase_19 AC 2 ms
6,944 KB
testcase_20 AC 1 ms
6,940 KB
testcase_21 AC 2 ms
6,940 KB
testcase_22 WA -
testcase_23 WA -
testcase_24 WA -
testcase_25 AC 2 ms
6,944 KB
testcase_26 AC 2 ms
6,940 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

#include <algorithm>
#include <climits>
#include <cmath>
#include <cstdio>
#include <cstdlib>
#include <ctime>
#include <iostream>
#include <sstream>
#include <functional>
#include <map>
#include <set>
#include <unordered_map>
#include <unordered_set>
#include <bitset>
#include <string>
#include <cstring>
#include <vector>
#include <queue>
#include <stack>
#include <deque>
#include <list>
#include <numeric>
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
typedef long double ld;
typedef pair<ll,ll> P;
typedef pair<P,ll> PPI;
typedef pair<ll,P> PIP;
typedef vector<ll> vl;
typedef vector<vl> vvl;
typedef vector<P> vp;
#define PQ(T) priority_queue<T,vector<T>,greater<T>>
#define PQ2(T) priority_queue<T>
const double PI = 3.14159265358979323846;
const double EPS = 1e-12;
const ll INF = 1LL<<29;
const ll mod = 1e9+7;
#define REP(i,a,b) for(ll (i)=a;(i)<(ll)(b);++(i))
#define rep(i,n) REP(i,0,n)
#define rep1(i,n) REP(i,1,n+1)
#define repd(i,n,d) for(ll (i)=0;(i)<(ll)(n);(i)+=(d))
#define all(v) (v).begin(), (v).end()
#define pb(x) push_back(x)
#define mp(x,y) make_pair((x),(y))
#define mset(m,v) memset((m),(v),sizeof(m))
#define chmin(x,y) ((x)=min((x),(y)))
#define chmax(x,y) ((x)=max((x),(y)))
#define fst first
#define snd second
#define UNIQUE(x) (x).erase(unique(all(x)),(x).end())
#define DEBUG(x) cerr<<"line ("<<__LINE__<<")  "<<#x<<": "<<x<<endl;
template<class T> ostream &operator<<(ostream &os, const vector<T> &v){int n=v.size();rep(i,n)os<<v[i]<<(i==n-1?"":" ");return os;}
#define N 110000
ll fact[N], d[N];

bool isPrime(ll x){
	if(x<=1) return false;
	for(ll i = 2; i*i<=x; i++) if(x%i==0) return false;
	return true;
}

ll rec(ll x, ll n, ll t){
	//if(x==6) cerr<<x<<" "<<" "<<t<<endl;
	if(d[x]) return d[x];
	if(x==1) return 0;
	ll x2 = x;
	d[x] = n/x*t;
	for(ll i = 2; i*i <= x2; i++){
		if(x2%i) continue;
		x2 /= i;
		d[x] += rec(x/i, n, -t);
	}
	if(x2) d[x] += rec(x/x2, n, -t);
	return d[x];
}

ll solve(ll x, ll n){
	ll y = 1, t = -1;
	for(ll i = 2; i*i <= x; i++){
		if(!(x%i)){
			y *= i;
			t *= -1;
			while(!(x%i)) x /= i;
		}
	}
	if(x>1){
		y *= x;
		t *= -1;
	}
	return rec(y, n, t);
}
int main(){
	ll n, m;
	cin>>n>>m;
	fact[0] = 1;
	rep(i, n) fact[i+1] = fact[i]*(i+1)%mod;
	ll res = 0;
	/*for(ll i = m; i <= n; i+=m){
		ll n2 = n/m, i2 = i/m;
		//cerr<<n2<<" "<<i2<<" "<<(n2-n2/i2)<<endl;
		ll t = n2-n2/i2;
		if(i2==1) t = n2-1;
		(res+=t*fact[n-2])%=mod;
	}*/
	ll n2 = n/m;
	ll cnt = 0;
	for(ll i = 1; i <= n2; i++){
		//ll t = solve(i, n2);
		//cerr<<i<<" "<<t<<endl;
		cnt += solve(i, n2);
		//cerr<<cnt<<endl;
		//if(isPrime(i)) cnt += n2/i;
	}
	res = max(0LL, (n2*n2-cnt-1))%mod*fact[n-2]%mod;
	cout<<res<<endl;
	return 0;
}
0