結果

問題 No.1708 Quality of Contest
ユーザー yudedakoyudedako
提出日時 2022-01-25 15:19:40
言語 Scala(Beta)
(3.4.0)
結果
WA  
実行時間 -
コード長 1,713 bytes
コンパイル時間 12,883 ms
コンパイル使用メモリ 271,076 KB
実行使用メモリ 117,860 KB
最終ジャッジ日時 2024-05-09 15:04:31
合計ジャッジ時間 62,029 ms
ジャッジサーバーID
(参考情報)
judge3 / judge4
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 871 ms
65,556 KB
testcase_01 AC 863 ms
65,588 KB
testcase_02 AC 867 ms
65,572 KB
testcase_03 WA -
testcase_04 WA -
testcase_05 WA -
testcase_06 WA -
testcase_07 WA -
testcase_08 AC 854 ms
65,468 KB
testcase_09 WA -
testcase_10 TLE -
testcase_11 TLE -
testcase_12 TLE -
testcase_13 TLE -
testcase_14 TLE -
testcase_15 TLE -
testcase_16 TLE -
testcase_17 TLE -
testcase_18 TLE -
testcase_19 TLE -
testcase_20 TLE -
testcase_21 TLE -
testcase_22 TLE -
testcase_23 TLE -
testcase_24 TLE -
testcase_25 TLE -
権限があれば一括ダウンロードができます

ソースコード

diff #

import scala.annotation.tailrec
import scala.collection.mutable
import scala.io.StdIn.*


@main def main =
  val Array(n, m, x) = readLine().split(' ').map(_.toInt)
  val problem = Array.fill(n){
    val Array(a, b) = readLine().split(' ').map(_.toInt)
    (a, b - 1)
  }
  val k = readLine().toInt
  val contestant = readLine().split(' ').map(_.toInt)
  val sortedWithQuality = (0 until n).sorted(Ordering.by[Int, Int](problem(_)._1).reverse).toList
  var all = sortedWithQuality
  var newGenre = sortedWithQuality
  val useGenre = Array.fill(m){false}
  val useProblem = Array.fill(n){false}
  val contestantCount = Array.fill(n + 1){0}
  for c <- contestant do
    contestantCount(c) += 1
  var rest = k - contestantCount(0)
  @tailrec def popNewGenre(rest: List[Int]): List[Int] =
    rest match
      case h::t if useGenre(problem(h)._2) => popNewGenre(t)
      case _ => rest
  @tailrec def popAll(rest: List[Int]): List[Int] =
    rest match
      case h::t if useProblem(h) => popAll(t)
      case _ => rest
  var result = 0L
  for i <- 1 to n do
    newGenre = popNewGenre(newGenre)
    all = popAll(all)
    (newGenre, all) match
      case (Nil, h::t) =>
        useProblem(h) = true
        result += problem(h)._1 * rest
      case (h::t, Nil) =>
        useProblem(h) = true
        useGenre(problem(h)._2) = true
        result += (problem(h)._1 + x) * rest
      case (hi::ti, hj::tj) =>
        if problem(hi)._1 + x < problem(hj)._1 then
          useProblem(hj) = true
          result += problem(hj)._1 * rest
        else
          useProblem(hi) = true
          useGenre(problem(hi)._2) = true
          result += (problem(hi)._1 + x) * rest
    rest -= contestantCount(i)
  println(result)
0