#1025131 (cLay) No.2954 Calculation of Exponentiation

• 問題: No.2954 Calculation of Exponentiation
• ユーザー: tails
• 提出日時: 2024-11-08 22:04:54
• 言語: cLay (20240714-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

入力	結果	実行時間; 実行使用メモリ
testcase_00	AC	12 ms; 8,320 KB
testcase_01	AC	11 ms; 8,192 KB
testcase_02	AC	11 ms; 8,448 KB
testcase_03	AC	11 ms; 8,192 KB
testcase_04	AC	11 ms; 8,448 KB
testcase_05	AC	11 ms; 8,448 KB
testcase_06	AC	11 ms; 8,320 KB
testcase_07	AC	11 ms; 8,448 KB
testcase_08	AC	11 ms; 8,448 KB
testcase_09	AC	12 ms; 8,448 KB
testcase_10	AC	11 ms; 8,448 KB
testcase_11	AC	11 ms; 8,448 KB
testcase_12	AC	11 ms; 8,320 KB
testcase_13	AC	12 ms; 8,320 KB
testcase_14	AC	12 ms; 8,448 KB
testcase_15	AC	11 ms; 8,448 KB
testcase_16	AC	11 ms; 8,448 KB
testcase_17	AC	11 ms; 8,320 KB
testcase_18	AC	11 ms; 8,448 KB
testcase_19	AC	11 ms; 8,192 KB
testcase_20	AC	11 ms; 8,448 KB
testcase_21	AC	10 ms; 8,448 KB
testcase_22	AC	11 ms; 8,448 KB
testcase_23	AC	11 ms; 8,448 KB
testcase_24	AC	11 ms; 8,448 KB
testcase_25	AC	11 ms; 8,448 KB
testcase_26	AC	11 ms; 8,320 KB
testcase_27	AC	11 ms; 8,320 KB
testcase_28	AC	10 ms; 8,192 KB
testcase_29	AC	11 ms; 8,448 KB
testcase_30	AC	10 ms; 8,448 KB

ソースコード

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");
}