Collect[Sum[((a-i)*(p*K+q)+(r*K+s))(i+T),{i,0,a}], {T,K}]