結果

問題 No.628 Tagの勢い
ユーザー kotatsugame
提出日時 2018-04-12 03:20:19
言語 Raku
(rakudo v2024.12)
結果
AC  
実行時間 546 ms / 2,000 ms
コード長 117 bytes
コンパイル時間 1,992 ms
コンパイル使用メモリ 145,896 KB
実行使用メモリ 144,412 KB
最終ジャッジ日時 2024-10-07 22:44:16
合計ジャッジ時間 11,867 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 19
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff # 

my%h;for (^get) ->$a {get;get~~m/\s\d+/;%h{$_}-=$/for get.words};map {put (.value,-.key)if $_},%h.antipairs.sort[^10]
0