結果

問題 No.377 背景パターン
ユーザー cielciel
提出日時 2016-06-05 16:59:01
言語 Ruby
(3.3.0)
結果
RE  
(最新)
AC  
(最初)
実行時間 -
コード長 405 bytes
コンパイル時間 51 ms
コンパイル使用メモリ 7,424 KB
実行使用メモリ 12,672 KB
最終ジャッジ日時 2024-10-08 15:59:28
合計ジャッジ時間 2,916 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge4
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 RE -
testcase_01 RE -
testcase_02 RE -
testcase_03 RE -
testcase_04 RE -
testcase_05 RE -
testcase_06 RE -
testcase_07 RE -
testcase_08 RE -
testcase_09 RE -
testcase_10 RE -
testcase_11 RE -
testcase_12 RE -
testcase_13 RE -
testcase_14 RE -
testcase_15 RE -
testcase_16 RE -
testcase_17 RE -
testcase_18 RE -
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.rb:3: warning: `?' just followed by `yield' is interpreted as a conditional operator, put a space after `?'
Syntax OK

ソースコード

diff # 

require'prime'
def x(a,d,n,t)
	d==a.size ?yield(n,t):(0..a[d][1]).map{|i|x(a,d+1,n*a[d][0]**i,i==0?t:t*(a[d][0]-1)*a[d][0]**(i-1),&proc)}
end
q=->x,y{z=1;(y%2>0&&z=z*x%M;x=x*x%M;y/=2)while y>0;z}

C={}
M=10**9+7
H,W,K=gets.split.map &:to_i
B=W.prime_division
x(H.prime_division,r=0,1,1){|a,at|
	x(B,0,1,1){|b,bt|
		k=W*H*a.gcd(b)/a/b
		C[k]=q[K,k]if !C.has_key?k
		r=(r+at*bt*C[k])%M
	}
}
p r*q[W*H,M-2]%M
0