Помощь - Поиск - Пользователи - Календарь
Полная версия: метод левых прямоугольников!
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
timur
Найти площадь фигуры!(я прикрепил эту фигуру к теме)
Использовать:
function f(x:real):real;
begin
f:=sin(x);
end;


число пи это pi
a=0
b=pi
ответ равен приближено 2
Ввывод осуществить с помощью writeln(s=' , s:0:6);
volvo
А что, FAQ: Метод прямоугольников тебя не устраивает? Тогда объясни, почему...
timur
Цитата(volvo @ 14.12.2005 21:26) *

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

Я НЕ ПОЙМУ ЧТО МНЕ куда надо подставлять именно для моей задачи!volvo пожалуйста помоги!мне в понедельник эту прогу надо сдавать!!! wacko.gif
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);
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.