結果

問題 No.1015 おつりは要らないです
コンテスト
ユーザー yudedako
提出日時 2022-01-26 18:26:36
言語 Scala(Beta)
(3.8.1)
コンパイル:
scalac _filename_
実行:
java -cp .:/home/linuxbrew/.linuxbrew/Cellar/scala/3.8.1/libexec/maven2/org/scala-lang/scala3-library_3/3.8.1/scala3-library_3-3.8.1.jar:/home/linuxbrew/.linuxbrew/Cellar/scala/3.8.1/libexec/maven2/org/scala-lang/scala-library/3.8.1/scala-library-3.8.1.jar _class_
結果
AC  
実行時間 1,195 ms / 2,000 ms
コード長 686 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 13,367 ms
コンパイル使用メモリ 287,816 KB
実行使用メモリ 76,948 KB
最終ジャッジ日時 2026-03-09 19:32:52
合計ジャッジ時間 43,317 ms
ジャッジサーバーID
（参考情報） 		judge2_0 / judge1_1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 33
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

import scala.annotation.tailrec
import scala.io.StdIn.*
import scala.math.*

@main def main =
  val Array(n, x, y, z) = readLine().split(' ').map(_.toInt)
  val pay = readLine().split(' ').map(_.toInt)
  val bill = Array(1000 -> x, 5000 -> y, 10000 -> z)
  for (money, count) <- bill.reverseIterator do
    var rest = count
    for i <- 0 until n do
      if pay(i) >= money then
        val use = min(rest, pay(i) / money)
        pay(i) -= use * money
        rest -= use
    for i <- (0 until n).sortWith((i, j) => pay(i) % money > pay(j) % money) do
      if rest > 0 && pay(i) >= 0 then
        rest -= 1
        pay(i) -= money
  println(if pay.forall(_ < 0) then "Yes" else "No")
0