Определение одного параметра геометрической фигуры
Помогите пожалуйста сделать программу в pascal: Найти минимальное значение высоты усечённого прямого конуса h1(h1 изменяяется от g до n с шагом m) и соответствующие значения высоты h2 и образующей s прямого конуса, для которых объём прямого конуса не меньше объёма куба со стороной а. Радиус верхнего основания r1 и радиус нижнего основания r2 усечённого прямого конуса остаются неизменными. Заранее большое спасибо!!!
