решите пожалуйста.....очень нужно...а сама не шарю...

[darika]

Вычислить приближенно S фмгуры, ограниченной графики финкции y1 и y2 развивая отрезок х на 10 частей и суммируя площади прямоугольников с высотой, определенной значением функции в середине основания:
y1= X^2
y2= 5 +x\2

помогите пожалуйста..тут без всяких массивов...

[__STDC__]

я выкладывал тут исходник... вычисление интегралов методом прямоугольников... между прочим тебе же, в твоей предыдущей теме.. http://www.programmersforum.ru/showthread.php?t=44506 убрать массивы элементарно... вместо них объявить переменные просто вещественные и подставить новые идентификаторы переменных... и все..

[darika]

я даж не знаю че такое массивы...мы не проходили...

[darika]

Блин...кому легко...ком нет...я эт вообще не пойму

[__STDC__]

function f(x:extended):extended;
begin
        f:=sqr(x);
        //f:=5+x/2;
end;

function square(h:extended):extended;
var
        i:integer;
        func,center:extended;
begin
        square:=0;
        for i:=0 to n-1 do begin
                center:=x1+(i+1/2)*h;
                func:=f(center);
                square:=square+h*func;
        end;
        writeln(square:0:2);
end;

Только если нужно найти площадь фигуры ограниченной двумя этими графиками придется использовать формулу для вычисления площади в прямоугольных координатах

[darika]

function f(x:extended):extended;
а че это означает??

[__STDC__]

функция твоя.. просто для увеличения точности использовал тип extended, это из моей старой проги.. можно real...

[darika]

а ее нельзя проще решить? например, оператором цикла?

[__STDC__]

зачем? оО Тебе нужно вычислять эту функцию для всех точек центров отрезков разбиений... цель - не нахождение корней уравнения, а вычисление площади фигуры...
вот формула вычисления площади фигуры, ограниченной двумя графиками функций, в прямоугольной системе координат:

***
криво немного получилось... интеграл от a до b

[darika]

наи просто так нужно решать! как ты решаешь нам нельзя...мы не проходили