We seek to determine the t which maximizes V[t]. And we can do this by replacing R in a computation of the volume of the cone by an expression (from the solution of the perimeter equation for R above) involving r and t alone.

Input := 


V[t_] = 1/3 Pi R^2 Sqrt[r^2 - R^2]/.sol[[1]];