P-99; solve problem 1.04 - length of a list