結果
問題 | No.1359 [Zelkova 3rd Tune] 四人セゾン |
ユーザー |
![]() |
提出日時 | 2021-01-23 15:18:36 |
言語 | Crystal (1.14.0) |
結果 |
AC
|
実行時間 | 449 ms / 2,000 ms |
コード長 | 2,065 bytes |
コンパイル時間 | 16,371 ms |
コンパイル使用メモリ | 296,808 KB |
実行使用メモリ | 23,108 KB |
最終ジャッジ日時 | 2024-06-30 22:05:15 |
合計ジャッジ時間 | 39,076 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 75 |
ソースコード
lib Cfun strtoll(s : UInt8*, p : UInt8**, b : Int32) : Int64endclass Stringdef to_i64C.strtoll(self, nil, 10)endendstruct Mint@@MOD = 1_000_000_007i64def self.mod@@MODenddef self.mod=(mod)@@MOD = mod.to_i64enddef self.zeroMint.newend@value : Int64def initialize@value = 0i64enddef initialize(value)@value = value.to_i64 % @@MODenddef initialize(m : Mint)@value = m.valueendprotected def value=(value : Int64)@value = valueendgetter value : Int64def + : selfselfenddef - : selfMint.new(value != 0 ? @@MOD - @value : 0)enddef +(m)Mint.new(@value + m.to_i64 % @@MOD)enddef +(m : Mint)result = Mint.newresult.value = @value + m.valueresult.value -= @@MOD if result.value > @@MODresultenddef -(m)Mint.new(@value - m.to_i64 % @@MOD)enddef -(m : Mint)result = Mint.newresult.value = @value - m.valueresult.value += @@MOD if result.value < 0resultenddef *(m)Mint.new(@value * m.to_i64)enddef /(m)raise DivisionByZeroError.new if m == 0a, b, u, v = m.to_i64, @@MOD, 1i64, 0i64while b != 0t = a // ba -= t * ba, b = b, au -= t * vu, v = v, uendMint.new(@value * u)enddef //(m)self / menddef **(m : Int)t, res = self, Mint.new(1)while m > 0res *= t if m.odd?t *= tm >>= 1endresenddef ==(m)@value == m.to_i64enddef !=(m)@value != m.to_i64enddef succself + 1enddef predself - 1enddef to_i64 : Int64@valueenddelegate to_s, to: @valuedelegate inspect, to: @valueendstruct Intdef to_mint : MintMint.new(self)endendclass Stringdef to_mint : MintMint.new(self)endendn, k, m = read_line.split.map(&.to_i)Mint.mod = ma = (1..4).map { read_line.split.map(&.to_i).sort }.transposeputs a.sum { |v|(v.max - v.min).to_mint ** k}