結果

問題 No.368 LCM of K-products
ユーザー ciel
提出日時 2016-05-30 17:37:29
言語 Ruby
(3.4.1)
結果
RE  
実行時間 -
コード長 279 bytes
コンパイル時間 345 ms
コンパイル使用メモリ 7,424 KB
実行使用メモリ 15,616 KB
最終ジャッジ日時 2024-10-07 18:49:47
合計ジャッジ時間 4,390 ms
ジャッジサーバーID
(参考情報)
judge2 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 34 RE * 1
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

z=->x,y{y==0?1:x*z[x,y-1]%M}
M=10**9+7
E=Hash.new{|h,k|h[k]=[]}
N,K=gets.split.map &:to_i
IO.popen('factor '+gets){|io|
	io.each{|line|
		line.split[1..-1].map(&:to_i).group_by{|e|e}.each{|k,v|E[k]<<v.size}
	}
}
r=1
E.each{|k,v|r=r*z[k,v.sort_by{|e|-e}.take(K).reduce(:+)]%M}
p r
0