g = 9.8;
x[t_] := -(g/2) t^2 + 6000 t + 180000

x[(6000/g)]

Solve[x[t] == 0, t]

(1253.7887459965584`) + 60