ReplaceAll[Table["super"*cos((n*Pi)/2)^2*cos((n*Pi)/4)^2+"super"*cos(((n+1)*Pi)/2)^2*cos(((n+1)*Pi)/4)^2*cos(((n+1)*Pi)/8)^2,{n,1,1001}],0->"max"]