プログラミングのお題スレ Part22 (863ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

127(4): 2023/10/14(土)00:00 ID:sMwx6jpS(1) AAS
お題：角カッコの列が入力されるのでカッコの対応が取れていたら1，取れていなかったら0と表示せよ

<　[[]]
>　1

<　[[]
>　0

---

128: 17 2023/10/14(土)02:22 ID:BgrcFKKf(1/2) AAS
>>127
Perl

bash 等のシェルのコマンドラインで以下のように入力すると標準入力から入力して結果を標準出力に出力する。

perl -ne '$n=0;while(/(.)/g){if($1eq"["){$n++}elsif($1eq"]"){$n--}}$f=$n==0?1:0;print"$f\n"'

実行例
[[]]
1
省6

---

130: 2023/10/14(土)10:19 ID:BRbCCPQd(1) AAS
>>127 Ruby
%W( [[]] [[] [[[[]][[]]] [[[[]][[]]]] ][ #{} ).each{|s|
w = s.dup
{} while w.sub!( /\[\]/, '' )
puts "#{(s != '' && w == '')? 1 : 0} #{s.inspect}"
}

# 1 "[[]]"
省5

---

131: 2023/10/14(土)22:38 ID:5dUK8HoW(1) AAS
>>127
C#
外部ﾘﾝｸ:paiza.io

---

146: 2023/10/28(土)20:54 ID:U0JINWpQ(1) AAS
>>101 octave
外部ﾘﾝｸ:ideone.com
function s = f(s, i)
s(circshift(i, -1, 2)) = s(i);
end

>>127 ocaml
外部ﾘﾝｸ:ideone.com
省11

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.027s