結果

問題 No.125 悪の花弁
ユーザー cielciel
提出日時 2016-06-05 22:13:29
言語 Ruby
(3.3.0)
結果
AC  
実行時間 511 ms / 5,000 ms
コード長 452 bytes
コンパイル時間 95 ms
コンパイル使用メモリ 7,296 KB
実行使用メモリ 18,688 KB
最終ジャッジ日時 2024-06-08 02:08:53
合計ジャッジ時間 3,529 ms
ジャッジサーバーID
(参考情報)
judge2 / judge5
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 511 ms
12,032 KB
testcase_01 AC 234 ms
18,560 KB
testcase_02 AC 275 ms
18,560 KB
testcase_03 AC 428 ms
18,688 KB
testcase_04 AC 449 ms
12,160 KB
testcase_05 AC 400 ms
12,288 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

#!/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