Program that identifies a group of 4 1's in a row