こういうときは男と女で考えるとわかりやすい(?
↓カップルの数カウンタ
#module
#deffunc parcount var src
num = 0 // カップルの数を入れる変数
doku = 0 // 独身♂の数を入れる変数
repeat strlen(src)
read = peek(src,cnt)
if read == '('{ // ♂を発見したら、独身♂の数を1増やす
doku++
}else:if read == ')'{ // ♀を発見したら独身♂がいるか確認
if doku > 0{ // 独身♂がいればカップル成立
doku-- // 独身♂の数を1減らし
num++ // カップルの数を1増やす
}
}
loop
return num
#global
// テスト --------------------------------------
strings = "(()())()"
parcount strings
mes stat