gets
$<.bytes{|b|b<11?$.=1:$_[-$.-=1]-=b%6-2}
print