結果

問題 No.325 マンハッタン距離2
コンテスト
ユーザー Leonardone
提出日時 2015-12-18 03:23:05
言語 Ruby
(3.4.1)
結果
WA  
実行時間 -
コード長 1,523 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 221 ms
コンパイル使用メモリ 7,296 KB
実行使用メモリ 12,416 KB
最終ジャッジ日時 2024-09-16 08:25:20
合計ジャッジ時間 3,684 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 12 WA * 12
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
raw source code 

#! ruby
# yukicoder My Practice
# author: Leonardone @ NEETSDKASU

def gs() gets.chomp end
def gi() gets.to_i end
def gss() gets.chomp.split end
def gis() gss.map(&:to_i) end
def nmapf(n,f) n.times.map{ __send__ f } end
def arr2d(h,w,v=0) h.times.map{[v] * w} end
def ngs(n) nmapf n,:gs end
def ngi(n) nmapf n,:gi end
def ngss(n) nmapf n,:gss end
def ngis(n) nmapf n,:gis end
def for2p(hr,wr,&pr) hr.each{|i|wr.each{|j| yield(i,j)}} end
def nsum(n) n * (n + 1) / 2 end

x1, y1, x2, y2, d = gis

def f(x1,x2)
    case
    when x2 < 0
        [false, [[-x1,-x2]]]
    when x2 == 0
        [true, [[1,-x1]]]
    when x1 > 0
        [false,[[x1,x2]]]
    when x1 == 0
        [true,[[1,x2]]]
    else
        [true,[[1,-x1],[1,x2]]]
    end
end

zx, xs = f(x1,x2)
zy, ys = f(y1,y2)

c = (zx && zy) ? 1 : 0

for2p(xs, ys) {|x,y|
    lx = x[1] - x[0]
    ly = y[1] - y[0]
    m0 = x[0] + y[0]
    m1 = x[1] + y[1]
    l0 = d - m0
    case
    when d < m0
        c += 0
    when m1 <= d
        c += (lx + 1) * (ly + 1)
    when l0 <= lx && l0 <= ly
        c += nsum(l0 + 1)
    when l0 <= lx # && ly < l0
        c += nsum(l0 + 1) - nsum(lx - ly)
    when l0 <= ly # && lx < l0
        c += nsum(l0 + 1) - nsum(ly - lx)
    else
        c += nsum(l0 + 1) - nsum(l0 - lx) - nsum(l0 - ly)
    end
}

[[zx,ys], [zy,xs]].each do |z, zs|
    next if !z
    zs.each do |e0,e1|
        case
        when e1 < d
            c += e1 - e0 + 1
        when e0 <= d && d <= e1
            c += d - e0 + 1
        end
    end
end

puts c
0