Метод прямоугольников (Паскаль).

[Alexey_HvaranG]

Помогите пожалуйста в следующем: Необходимо составить программу для вычисления определенного интеграла методом прямоугольников(левых, правых, средних). Интеграл союственно вотъ:

1
∫ x³ √ (x+1) dx То есть интеграл с нижней границей: (-1), верхней1)
-1

В самом интеграле x в кубе, умноженный на корень из

(x+1) (* я просто не смог корень под всем (x+1) поставить, не знаю как *)

Вообщем помогите пожалуйста и если можно, я знаю там будет много всяких переменных, что они означают .

Я искал в яндексе подобные программы, но так и не смог свою приспособить. =(
Заранее спасибо.

[Sweta]

Ну а сами что создали? Или книг в глаза не видели?

[Stilet]

Alexey_HvaranG

Ты хотя-бы формулу то вывел бы. Тут не все великие математики.
Если так навскидку то примерно :

const n=10;
var y,a,b,x:double; i:integer;
begin
 
 x:=-1; b:=n/10;
 while x<1 do begin
  y:=y+x*x*x*sqrt(x+1);
  x:=x+b;
 end;
 Write('resultat=',y);
end.

Практически все. Но не проверял.