main=getContents>>=putStr.f.last f '1'=replicate 10000'1' f _="0"