while""do s=io.read()for j in("AaaABbbBCccCDddD"):rep(5):gmatch".."do s=s:gsub(j,"")end print(#s>0 and 0 or 1)end