結果

問題 No.200 カードファイト！
ユーザー tailstails
提出日時 2019-09-18 11:31:41
言語 Bash
(Bash 5.1.16)
結果
AC  
実行時間 16 ms / 2,000 ms
コード長 357 bytes
コンパイル時間 34 ms
コンパイル使用メモリ 6,948 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-10-15 09:01:20
合計ジャッジ時間 1,020 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge2
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 14 ms
5,248 KB
testcase_01 AC 15 ms
5,248 KB
testcase_02 AC 2 ms
5,248 KB
testcase_03 AC 3 ms
5,248 KB
testcase_04 AC 3 ms
5,248 KB
testcase_05 AC 10 ms
5,248 KB
testcase_06 AC 12 ms
5,248 KB
testcase_07 AC 12 ms
5,248 KB
testcase_08 AC 9 ms
5,248 KB
testcase_09 AC 13 ms
5,248 KB
testcase_10 AC 8 ms
5,248 KB
testcase_11 AC 7 ms
5,248 KB
testcase_12 AC 6 ms
5,248 KB
testcase_13 AC 3 ms
5,248 KB
testcase_14 AC 3 ms
5,248 KB
testcase_15 AC 3 ms
5,248 KB
testcase_16 AC 2 ms
5,248 KB
testcase_17 AC 3 ms
5,248 KB
testcase_18 AC 3 ms
5,248 KB
testcase_19 AC 5 ms
5,248 KB
testcase_20 AC 9 ms
5,248 KB
testcase_21 AC 5 ms
5,248 KB
testcase_22 AC 6 ms
5,248 KB
testcase_23 AC 3 ms
5,248 KB
testcase_24 AC 6 ms
5,248 KB
testcase_25 AC 6 ms
5,248 KB
testcase_26 AC 4 ms
5,248 KB
testcase_27 AC 9 ms
5,248 KB
testcase_28 AC 16 ms
5,248 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

read n
read a
read B
read c
read D
for i in $B;{ y[i]+=\ $[i=101-i];};B=(${y[@]})
for i in $D;{ z[i]+=\ $i;};D=(${z[@]})
for((;n--;)){
	eval v={b,d}';eval "((n$v))||$v=(\${${v^}[@]});n$v=\${#$v[@]}";'
	((r+=b+d<101,nb--<nd--))&&u=b v=d||u=d v=b
	for((j=n$v,i=0;x=$v[i];j[u+x>100]=i++)){ :;}
	eval "$v=(\${$v[@]::j} \${$v[@]:j+1}) $u=(\${$u[@]:1})"
}
echo $r
0