結果
問題 | No.520 プロジェクトオイラーへの招待 |
ユーザー |
|
提出日時 | 2017-05-30 01:44:08 |
言語 | Ruby (3.4.1) |
結果 |
AC
|
実行時間 | 360 ms / 4,000 ms |
コード長 | 331 bytes |
コンパイル時間 | 43 ms |
コンパイル使用メモリ | 7,552 KB |
実行使用メモリ | 13,312 KB |
最終ジャッジ日時 | 2024-09-21 18:17:33 |
合計ジャッジ時間 | 1,850 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge5 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 7 |
コンパイルメッセージ
Syntax OK
ソースコード
M=10**9+7;I=[1,1];*F=I;*R=I 2.upto(999){|i|I<<z=(M-M/i)*I[M%i]%M;F<<i*F[-1]%M;R<<z*R[-1]%M} f=->(a,b,c){(F[a+b+c-1]*R[b-1]*R[a+c]+g(a-1,b,c-1))%M} def g(a,b,c) $memo[[a,c]]||=F[a+b+c]*R[b-1]*R[a+c+1]%M+(a>0?g(a-1,b,c):F[b+c]*R[b]*R[c]%M)+(c>0?g(a,b,c-1):F[a+b]*R[a]*R[b]%M)%M end gets;$<.map{|e|$memo={};p f[*e.split.map(&:to_i)]}