<>;@_=<>;print~~grep{$a=$_;1