$n=<>;push@{-$_},$'*-/ /for<>;print$|x($f|=$$_=$|=grep!$$_,@$_)for-$n..0