結果

問題 No.125 悪の花弁
コンテスト
ユーザー ciel
提出日時 2016-06-05 22:13:29
言語 Ruby
(3.4.1)
結果
AC  
実行時間 542 ms / 5,000 ms
コード長 452 bytes
コンパイル時間 275 ms
コンパイル使用メモリ 7,296 KB
実行使用メモリ 18,560 KB
最終ジャッジ日時 2024-12-26 16:54:41
合計ジャッジ時間 3,869 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 6
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
raw source code 

#!/usr/bin/ruby
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=10**9+7
K=gets.to_i
C=gets.split.map(&:to_i)
s=C.reduce(:+)
g=C.reduce(:gcd)
r=0
x=[]
y=[]
g.downto(1){|i|
	next if g%i!=0
	rem=s/i-1
	m=d=1
	K.times{|j|
		(C[j]/i-(j==0 ? 1 : 0)).times{|l|
			m=m*rem%M
			d=d*(l+1)%M
			rem-=1
		}
	}
	m*=pow(d,M-2,M)
	x.size.times{|j|
		m-=y[j] if x[j]%i==0
	}
	m%=M
	y<<m
	m=m*pow(C[0]/i,M-2,M)%M
	x<<i
	r=(r+m)%M
}
p r
0