結果
問題 | No.447 ゆきこーだーの雨と雪 (2) |
ユーザー |
|
提出日時 | 2019-01-25 13:34:33 |
言語 | Nim (2.2.0) |
結果 |
CE
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 1,398 bytes |
コンパイル時間 | 579 ms |
コンパイル使用メモリ | 51,828 KB |
最終ジャッジ日時 | 2024-11-14 20:47:45 |
合計ジャッジ時間 | 910 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge3 |
(要ログイン)
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
/home/judge/data/code/Main.nim(2, 21) Error: cannot open file: queues
ソースコード
import sequtils,algorithm,math,tables,sugarimport sets,intsets,queues,heapqueue,bitops,strutilstemplate times*(n:int,body) = (for _ in 0..<n: body)template `max=`*(x,y) = x = max(x,y)template `min=`*(x,y) = x = min(x,y)proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}proc scan(): int =while true:let k = getchar_unlocked()if k < '0': breakresult = 10 * result + k.ord - '0'.ordproc calcScore(star:int,ac:int):int = 50 * star + (50 * star) * 5 div (4 + ac)let n = scan()let L = newSeqWith(n,scan())var AC = newSeqWith(n,1)var scores = newSeqWith(n,initTable[string,int]()) # id -> name -> scorevar names = initSet[string]()var lastSubmits = initTable[string,int]()for i in 0..<scan():let S = stdin.readLine().split()let (name,pID) = (S[0],S[1][0].ord - 'A'.ord)let score = calcScore(L[pID],AC[pID])names.incl namescores[pID][name] = scoreAC[pID] += 1lastSubmits[name] = ilet results = toSeq(names.items).map(proc(name:string) : tuple[name:string,scores:seq[int],sum:int] =let myScores = scores.mapIt(if name in it: it[name] else: 0)return (name,myScores,myScores.sum())).sorted((x,y) => (if x.sum != y.sum: -x.sum + y.sum else:lastSubmits[x.name] - lastSubmits[y.name]))for i,r in results:let (name,S,sum) = rstdout.write i+1," ",name," "for s in S: stdout.write s," "echo sum