結果

問題 No.133 カードゲーム
ユーザー yuruhiya
提出日時 2020-10-18 16:53:49
言語 Raku
(rakudo v2024.12)
結果
AC  
実行時間 549 ms / 5,000 ms
コード長 122 bytes
コンパイル時間 507 ms
コンパイル使用メモリ 135,164 KB
実行使用メモリ 140,344 KB
最終ジャッジ日時 2024-07-21 06:31:37
合計ジャッジ時間 13,138 ms
ジャッジサーバーID
(参考情報)
judge5 / judge1
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 19
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

$/=get;
$_=([X] (get.words xx 2)>>.permutations).map({
	$!=([Z] $_).map({[>] $_}).sum;
	$! > $/-$!
});
say @$_.grep(?*)/$_
0