結果

問題 No.2954 Calculation of Exponentiation
コンテスト
ユーザー tails
提出日時 2024-11-08 22:04:54
言語 cLay
(20241019-1)
結果
AC  
実行時間 12 ms / 2,000 ms
コード長 603 bytes
コンパイル時間 8,503 ms
コンパイル使用メモリ 219,952 KB
実行使用メモリ 8,448 KB
最終ジャッジ日時 2024-11-08 22:05:09
合計ジャッジ時間 9,817 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 28
権限があれば一括ダウンロードができます

ソースコード

diff # 

ll get(){
	string@s;
	bool neg=false;
	ll v=0;
	for(char c:s){
		if(c=='-'){
			neg=true;
		}
		if(c>='0'&&c<='9'){
			v=v*10+(c-'0');
		}
	}
	return neg?-v:v;
}
{
	ll a=get(),b=get();
	ll afn,afa[64],afs[64];
	afn=Factor(a,afa,afs);
	bool saw2=false,saw5=false;
	rep(i,afn){
		ll x=afs[i];
		if(afa[i]==2){
			saw2=true;
			x-=4;
		}
		if(afa[i]==5){
			saw5=true;
			x-=4;
		}
		x*=b;
		if(x<0){
			wt("No");
			exit(0);
		}
		if(x%1d4){
			wt("No");
			exit(0);
		}
	}
	if(!saw2||!saw5){
		ll x=-4*b;
		if(x<0){
			wt("No");
			exit(0);
		}
		if(x%1d4){
			wt("No");
			exit(0);
		}
	}
	wt("Yes");
}
0