結果

問題 No.200 カードファイト！
ユーザー tails
提出日時 2019-09-17 17:55:12
言語 Bash
(Bash 5.2.21)
結果
AC  
実行時間 12 ms / 2,000 ms
コード長 478 bytes
コンパイル時間 69 ms
コンパイル使用メモリ 6,816 KB
実行使用メモリ 6,820 KB
最終ジャッジ日時 2024-10-15 09:01:18
合計ジャッジ時間 1,035 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 26
権限があれば一括ダウンロードができます

ソースコード

diff # 

read n
read a
read B
read c
read D

for i in $B;{ y[i]+=\ $i;};B=(${y[@]})
for i in $D;{ z[i]+=\ $i;};D=(${z[@]})

for((;n--;r+=k,k=0)){
	((${#b[@]}))||b=(${B[@]})
	((${#d[@]}))||d=(${D[@]})
	(((nb=${#b[@]})<(nd=${#d[@]})))&&{
		x=${b[-1]}
		b=(${b[@]::nb-1})
		for((j=nd-1,i=0;i<nd;++i)){
			((x>d[i]&&(k=1,j=i)))
		}
		d=(${d[@]::j} ${d[@]:j+1})
	}||{
		x=${d[0]}
		d=(${d[@]:1})
		for((j=0,i=nb;i--;)){
			((x<b[i]&&(k=1,j=i)))
		}
		b=(${b[@]::j} ${b[@]:j+1})
	}
}

echo $r
0