結果
| 問題 | No.368 LCM of K-products | 
| コンテスト | |
| ユーザー |  | 
| 提出日時 | 2016-05-01 21:38:22 | 
| 言語 | Ruby (3.4.1) | 
| 結果 | 
                                AC
                                 
                             | 
| 実行時間 | 119 ms / 2,000 ms | 
| コード長 | 473 bytes | 
| コンパイル時間 | 118 ms | 
| コンパイル使用メモリ | 7,680 KB | 
| 実行使用メモリ | 13,184 KB | 
| 最終ジャッジ日時 | 2024-09-22 14:45:01 | 
| 合計ジャッジ時間 | 5,060 ms | 
| ジャッジサーバーID (参考情報) | judge5 / judge2 | 
| 外部呼び出し有り | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| other | AC * 35 | 
コンパイルメッセージ
Syntax OK
ソースコード
require 'prime'
def pow(x,y)
	z=1
	while y!=0
		z=z*x%M if y&1!=0
		x=x*x%M
		y>>=1
	end
	z
end
M=10**9+7
E=Hash.new{|h,k|h[k]=[]}
N,K=gets.split.map(&:to_i)
if false
	gets.split.map(&:to_i).each{|e|
		e.prime_division.each{|n,p|E[n]<<p}
	}
else
	IO.popen('factor '+gets){|io|
		io.each{|line|
			h=Hash.new(0)
			line.split[1..-1].map(&:to_i).each{|e|h[e]+=1}
			h.each{|k,v|E[k]<<v}
		}
	}
end
r=1
E.each{|k,v|
	n=v.sort_by{|e|-e}.take(K).reduce(:+)
	r=r*pow(k,n)%M
}
p r
            
            
            
        