結果
問題 | No.834 Random Walk Trip |
ユーザー |
|
提出日時 | 2021-07-05 21:45:06 |
言語 | Crystal (1.14.0) |
結果 |
AC
|
実行時間 | 48 ms / 2,000 ms |
コード長 | 4,753 bytes |
コンパイル時間 | 13,870 ms |
コンパイル使用メモリ | 295,660 KB |
実行使用メモリ | 18,516 KB |
最終ジャッジ日時 | 2024-07-01 12:02:21 |
合計ジャッジ時間 | 15,105 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge2 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 26 |
ソースコード
def main(io)n, m = io.get2io.put_e 1 if n == 1f = Fact(Mint).new(m)c = Mint.zero(0..m).each do |i|next unless (i % (n*2) == 0 || i % (n*2) == n*2-1) && (i+m) % 2 == 0x = (i+m) // 2c += f.combi(m, x)end(1..m).each do |i|next unless (i % (n*2) == 1 || i % (n*2) == 0) && (i+m) % 2 == 0x = (i+m) // 2c += f.combi(m, x)endio.put cendclass Fact(T)def initialize(@n : Int32)@table = Array.new(@n+1, T.new(0))@table[0] = T.multiplicative_identity(1..@n).each do |i|@table[i] = @table[i-1] * iend@inv_table = Array.new(@n+1, T.new(0))@inv_table[@n] = T.multiplicative_identity // @table[@n](1..@n).reverse_each do |i|@inv_table[i-1] = @inv_table[i] * iendendgetter table : Array(T)getter inv_table : Array(T)def fact(n : Int)@table[n]enddef perm(n : Int, r : Int)@table[n] * @inv_table[n-r]enddef combi(n : Int, r : Int)@table[n] * @inv_table[r] * @inv_table[n-r]enddef homo(n : Int, r : Int)combi(n+r-1, r)end@table : Array(T)@inv_table : Array(T)endmacro min_u(a, b){{a}} = Math.min({{a}}, {{b}})endmacro max_u(a, b){{a}} = Math.max({{a}}, {{b}})enddef cdiv(a : Int, b : Int)(a + b - 1) // benddef isqrt(n : Int32)m = 46340r = (1..m).bsearch { |i| i**2 > n }r.nil? ? m : r - 1enddef isqrt(n : Int64)m = 3037000499_i64r = (1_i64..m).bsearch { |i| i**2 > n }r.nil? ? m : r - 1enddef powr(a : T, n : Int, i : T = T.multiplicative_identity) forall Tpowr(a, n, i) { |a, b| a * b }enddef powr(a : T, n : Int, i : T = T.multiplicative_identity, &block) forall Treturn i if n == 0r, b = i, awhile n > 0r = yield r, b if n.bit(0) == 1b = yield b, bn >>= 1endrenddef ext_gcd(a : T, b : T) forall Tif a == 0{b, T.new(0), T.new(1)}elseg, x, y = ext_gcd(b%a, a){g, y-(b//a)*x, x}endendabstract struct ModInt < Numberdef self.zeroself.new(0)enddef self.additive_identityself.new(0)enddef self.multiplicative_identityself.new(1)enddef initialize(v : Int)@v = (v % @@mod).to_i64enddef_hash @@mod, @vdef to_s@v.to_senddef to_s(io : IO) : Nil@v.to_s(io)endgetter v : Int64delegate to_i, to: @vdef ==(r : self)@v == r.venddef ==(r : Int)@v == (r % @@mod)enddef - : selfm(-@v)enddef +(r : self)m(@v + r.v)enddef +(r : Int)self + m(r)enddef -(r : self)m(@v - r.v)enddef -(r : Int)self - m(r)enddef *(r : self)m(@v * r.v)enddef *(r : Int)self * m(r)enddef //(r : self)self * r.invenddef //(r : Int)self // m(r)enddef **(n : Int)powr(self, n)enddef invm(ext_gcd(@v.to_i32, @@mod)[1])endprivate def m(v : Int)self.class.new(v)endendstruct Mint < ModInt; @@mod : Int32 = 10**9+7; endclass ProconIOdef initialize@buf = [] of String@index = 0enddef get(k : T.class = Int32) forall Tget_v(k)enddef get(*ks : T.class) forall Tks.map { |k| get_v(k) }endmacro define_getn{% for i in (2..9) %}def get{{i}}(k : T.class = Int32) forall Tget({% for j in (1..i) %}k{% if j < i %}, {% end %}{% end %})end{% end %}enddefine_getndef get_a(n : Int, k : T.class = Int32) forall TArray.new(n) { get_v(k) }enddef get_c(n : Int, k : T.class = Int32) forall Tget_a(n, k)enddef get_c(n : Int, *ks : T.class) forall Ta = Array.new(n) { get(*ks) }ks.map_with_index { |_, i| a.map { |e| e[i] } }endmacro define_getn_c{% for i in (2..9) %}def get{{i}}_c(n : Int, k : T.class = Int32) forall Tget_c(n, {% for j in (1..i) %}k{% if j < i %}, {% end %}{% end %})end{% end %}enddefine_getn_cdef get_m(r : Int, c : Int, k : T.class = Int32) forall TArray.new(r) { get_a(c, k) }enddef put(*vs)vs.each.with_index do |v, i|put_v(v)print i < vs.size - 1 ? " " : "\n"endenddef put_e(*vs)put(*vs)exitendprivate def get_v(k : Int32.class); get_token.to_i32; endprivate def get_v(k : Int64.class); get_token.to_i64; endprivate def get_v(k : String.class); get_token; endprivate def get_tokenif @buf.size == @index@buf = read_line.split@index = 0endv = @buf[@index]@index += 1vendprivate def put_v(vs : Enumerable)vs.each_with_index do |v, i|print vprint " " if i < vs.size - 1endendprivate def put_v(v)print vendendmain(ProconIO.new)