t[x_] :=  x/12 +  Sqrt[100^2+(300-x)^2]/4

t[1]

D[t[x],x]

DX := D[t[x],x]

DX

Solve[ DX == 0, x]

N[Solve[ DX == 0, x]]