Помогите пожалуйста! Нужно в паскале посчитать объем вращения гиперболы относительно оси х на промежутке от х1 до х2. Y=1/х.
Помогите пожалуйста! Нужно в паскале посчитать объем вращения гиперболы относительно оси х на промежутке от х1 до х2. Y=1/х.
Гость
Ответ(ы) на вопрос:
Гость{ объем фигуры вращения y=f(x) = 1/x x0 = 1, x1 = 2 }
var i: integer;
v,h,x0,f: real;
begin
v:=0; x0:=1; h:=0.001;
for i:=1 to 1000 do
begin
f:=(1/sqr(x0+(i-1)*h)+1/sqr(x0+i*h))/2;
v:=v+f*h;
end;
v:=2*pi*v;
writeln('объем = ',v);
writeln('точное значение V = ',pi);
end.
Не нашли ответ?
Похожие вопросы