結果

問題 No.377 背景パターン
ユーザー ciel
提出日時 2016-06-05 01:23:29
言語 Ruby
(3.4.1)
結果
RE  
実行時間 -
コード長 581 bytes
コンパイル時間 261 ms
コンパイル使用メモリ 7,424 KB
実行使用メモリ 12,800 KB
最終ジャッジ日時 2024-10-08 13:34:00
合計ジャッジ時間 3,163 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample RE * 5
other RE * 14
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff # 

#!/usr/bin/ruby
require 'prime'
class Integer
	def totient()    self.prime_division.reduce(1){|s,(n,p)|s*(n-1)*n**(p-1)} end
end
def divisor(a,d,n)
	return to_enum(:divisor,a,d,n) if !block_given?
	if d==a.size
		yield n
	else
		(0..a[d][1]).each{|i|
			divisor(a,d+1,n*a[d][0]**i,&proc)
		}
	end
end
def pow(x,y,m)
	z=1
	while y>0
		z=z*x%m if y%2>0
		x=x*x%m
		y/=2
	end
	z
end

M=1000000007
H,W,K=gets.split.map(&:to_i)
A=H.prime_division
B=W.prime_division
r=0
divisor(A,0,1){|a|
	divisor(B,0,1){|b|
		r+=a.totient*b.totient*pow(K,W*H*a.gcd(b)/a/b,M)
	}
}
p r*pow(W*H,M-2,M)%M
0