結果

問題 No.1046 Fruits Rush
ユーザー yosaka
提出日時 2020-05-08 21:22:46
言語 Nim
(2.2.0)
結果
WA  
実行時間 -
コード長 478 bytes
コンパイル時間 4,623 ms
コンパイル使用メモリ 72,960 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-07-03 23:26:43
合計ジャッジ時間 4,934 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 11 WA * 3
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 54) Warning: Use the new 'sugar' module instead; future is deprecated [Deprecated]
/home/judge/data/code/Main.nim(1, 8) Warning: imported and not used: 'streams' [UnusedImport]
/home/judge/data/code/Main.nim(1, 54) Warning: imported and not used: 'future' [UnusedImport]
/home/judge/data/code/Main.nim(1, 76) Warning: imported and not used: 'hashes' [UnusedImport]
/home/judge/data/code/Main.nim(1, 68) Warning: imported and not used: 'tables' [UnusedImport]

ソースコード

diff # 

import streams, sequtils, strutils, algorithm, math, future, sets, tables, hashes
proc `ceilDiv`*[T](x, y: T): T = x div y + ord(x mod y != 0)
proc `//=`*(x: var SomeInteger; y: SomeInteger) = x = x div y
proc `%=`*(x: var SomeInteger; y: SomeInteger) = x = x mod y

var
    L = stdin.readLine.split.map(parseInt)
    N = L[0]
    K = L[1]
    A = stdin.readLine.split.map(parseInt)
    ans = 0
A = A.sortedByIt(-it)
for i in 0..<K:
    if A[i] > 0:
        ans += A[i]
echo ans
0