ClearAll;
Apply[Plus,Table[(3k+k^2)t^k,{k,0,4}]]