結果

問題 No.125 悪の花弁
ユーザー cielciel
提出日時 2016-06-05 22:13:29
言語 Ruby
(3.3.0)
結果
AC  
実行時間 492 ms / 5,000 ms
コード長 452 bytes
コンパイル時間 40 ms
コンパイル使用メモリ 11,532 KB
実行使用メモリ 21,248 KB
最終ジャッジ日時 2023-08-27 06:17:42
合計ジャッジ時間 3,435 ms
ジャッジサーバーID
（参考情報） 		judge11 / judge15
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 492 ms
15,192 KB
testcase_01 AC 233 ms
21,244 KB
testcase_02 AC 266 ms
21,212 KB
testcase_03 AC 408 ms
21,248 KB
testcase_04 AC 417 ms
15,120 KB
testcase_05 AC 378 ms
15,204 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