I looked ahead a little at today's Algebra Notebook. I believe that there is an error in the code for Selected Problems 1.1.
I believe that
eq1=Sum[a+k*d,{k,1,50}]==200
should be
eq1=Sum[a+k*d,{k,0,49}]==200
and
eq2 = Sum[a + k*d, {k, 51, 100}] == 2700
should be
eq2 = Sum[a + k*d, {k, 50, 99}] == 2700