結果

問題 No.60 魔法少女
ユーザー むらためむらため
提出日時 2017-08-15 23:57:30
言語 Nim
(2.0.2)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,492 bytes
コンパイル時間 806 ms
コンパイル使用メモリ 66,924 KB
最終ジャッジ日時 2024-11-14 20:12:59
合計ジャッジ時間 1,325 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge1
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 50) Warning: Use the new 'sugar' module instead; future is deprecated [Deprecated]
stack trace: (most recent call last)
Main.nim(5, 7)           unpack
/home/judge/data/code/Main.nim(24, 38) template/generic instantiation of `unpack` from here
/home/judge/data/code/Main.nim(5, 7) Error: index 1 not in 0 .. 0

ソースコード

diff # 

import sequtils,strutils,strscans,algorithm,math,future,macros
template get*():string = stdin.readLine() #.strip()
macro unpack*(rhs: seq,cnt: static[int]): auto =
  let t = genSym(); result = quote do:(let `t` = `rhs`;())
  for i in 0..<cnt: result[0][1].add(quote do:`t`[`i`])

# N,K<1e6   |X,Y|,W,H<=500   HP,D<1e5
# [X,X+W] [Y,Y+W] に D 倒れていない敵の体力の合計
template imosReduce2(field:typed):void =
  for x in 1..<field.len:
    for y in 0..<field[x].len:
      field[x][y] += field[x-1][y]
  for x in 0..<field.len:
    for y in 1..<field[x].len:
      field[x][y] += field[x][y-1]
template imosRegist2(field:typed,x1,y1,x2,y2:int,val:typed):void =
  # range :: [x1..x2][y1..y2]
  field[x1][y1] += val
  field[x1][y2+1] -= val
  field[x2+1][y1] -= val
  field[x2+1][y2+1] += val

let
  (N,K) = get().split().map(parseInt).unpack(2)
  ene_XYHP = newSeqWith(N,get().split().map(parseInt))
  my_XYWHD = newSeqWith(K,get().split().map(parseInt))
var field : array[0..1002,array[0..1002,int]]
#var field = newSeqWith(1002,newSeqWith(1002,0))
#################### 2-imos ######################
for XYWHD in my_XYWHD:
  let # [X,X+W] [Y,Y+W] に
    (X,Y,W,H,D) = XYWHD.unpack(5)
    x1 = X + 500
    y1 = Y + 500
    x2 = min(500,X+W) + 500
    y2 = min(500,Y+H) + 500
  field.imosRegist2(x1,y1,x2,y2,D)
field.imosReduce2()

var damageSum = 0
for XYHP in ene_XYHP:
  let
    (X,Y,HP) = XYHP.unpack(3)
    D = field[X+500][Y+500]
  damageSum += max(0,HP - D)
echo damageSum
0