結果
問題 | No.377 背景パターン |
ユーザー |
|
提出日時 | 2021-03-12 12:30:25 |
言語 | Ruby (3.4.1) |
結果 |
RE
|
実行時間 | - |
コード長 | 347 bytes |
コンパイル時間 | 55 ms |
コンパイル使用メモリ | 7,296 KB |
実行使用メモリ | 12,928 KB |
最終ジャッジ日時 | 2024-10-13 21:14:49 |
合計ジャッジ時間 | 2,625 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | RE * 5 |
other | RE * 14 |
コンパイルメッセージ
Syntax OK
ソースコード
require'prime'def x(a,d=0,n=1,t=1)d==a.size ? yield(n,t):(0..a[d][1]).map{|i|x(a,d+1,n*a[d][0]**i,i>0?t*~-a[d][0]*a[d][0]**~-i:t,&proc)}endq=->x,y{z=1;(y%2>0&&z=z*x%M;x=x*x%M;y/=2)while y>0;z}C={}r=M=10**9+7H,W,K=gets.split.map &:to_ix(H.prime_division){|a,c|x(W.prime_division){|b,d|r=(r+c*d*C[k=W*H/a.lcm(b)]||=q[K,k])%M}}p r*q[W*H,M-2]%M