метод левых прямоугольников!, нужна помощь! Опции

[timur]

Найти площадь фигуры!(я прикрепил эту фигуру к теме)
Использовать:

function f(x:real):real;
begin
f:=sin(x);
end;

число пи это pi
a=0
b=pi
ответ равен приближено 2
Ввывод осуществить с помощью writeln(s=' , s:0:6);

Сообщение отредактировано: volvo - 7.11.2006 17:20

[volvo]

А что, FAQ: Метод прямоугольников тебя не устраивает? Тогда объясни, почему...

[timur]

А что, FAQ: Метод прямоугольников тебя не устраивает? Тогда объясни, почему...

Я НЕ ПОЙМУ ЧТО МНЕ куда надо подставлять именно для моей задачи!volvo пожалуйста помоги!мне в понедельник эту прогу надо сдавать!!!

[klem4]

А что тут может быть не понятно ? из FAQ :

{Введите сюда нужную функцию}
function F(x:real):real;
 begin
   F:=x*x*x*x+2*x*x+4      
 end;
{======================================}

BEGIN
 write('Начало интегрирования a = '); readln(a);
 write('Конец  интегрирования b = '); readln(b);
 write('Количество разбиений интервала n = '); readln(n);

Там где написано ввести функуию, меняешь га F := sin(x);
потом ввод заменяешь на

a := 0;
b := pi;
shag := 0.01;
n := trunc((b-a)/shag);