結果

問題 No.110 しましまピラミッド
コンテスト
ユーザー yuppe19 😺
提出日時 2015-12-29 13:55:45
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 5,000 ms
コード長 898 bytes
コンパイル時間 3,443 ms
コンパイル使用メモリ 67,564 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-29 12:29:02
合計ジャッジ時間 4,484 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 26
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 28) Warning: imported and not used: 'math' [UnusedImport]

ソースコード

diff # 

import strutils, sequtils, math, sets, algorithm

proc sorted[T](a: var seq[T]; cmp: proc (x, y: T): int {.closure.}; order = SortOrder.Ascending): seq[T] =
  result = a
  sort(result, cmp, order)

var
  nw, nb: int
  w, b: seq[int]

nw = stdin.readLine.parseInt
w = stdin.readLine.split.map(parseInt)
nb = stdin.readLine.parseInt
b = stdin.readLine.split.map(parseInt)

w = sorted(w, system.cmp[int]).reversed
b = sorted(b, system.cmp[int]).reversed

proc solve(a1:seq, a2:seq): int =
  var (a1, a2) = (a1, a2)
  result = 0
  var check = high(int)
  var should1 = true
  for i in 0.. a1.high:
    if check > a1[i] and should1:
      should1 = false
      check = a1[i]
      result += 1
    for j in 0.. a2.high:
      if check > a2[j] and not should1:
        should1 = true
        check = a2[j]
        result += 1
        break

var nya = solve(w, b)
var mya = solve(b, w)

echo max(nya, mya)
0