Добрый день уважаемые форумчане.
Передо мной стоит задача решить интеграл (1/(4+x^2)) методом трапеций.
Я попробывал и вот что получилось

Print “Nujno vvesti a,b,n,e”
Print “Vvedite a ” ;
Input a
Print “Vvedite b ” ;
Input b
Print “Vvedite n ” ;
Input n
Print “Vvedite e ” ;
Input e
h=(b-a)/n
Do
s=0
x=a
Do
s=s+((1/(4+x^2))+(1/(4+(x+h)^2)))·h/2
x =x+h
Loop While x<=b
h=h/2
s2=0
x=a
Do
s2=s2+((1/(4+x^2))+(1/(4+(x+h)^2)))·h/2
x=x+h
Loop While x<b
Loop While ABS|s-s2|>e
PRINT “Otvet” ; s2
END

Если найдёте ошибку пжлста срочно о ней сообщите! (IMG:style_emoticons/default/rolleyes.gif)

Срочно?! Может быть вы сначала подумаете еще раз над тем, что просите. А потом уже задачу Вашу обсуждать будем.

Последнее предложени я бы так написал: "сообщите, если будет время и желание" (IMG:style_emoticons/default/smile.gif) Хотя тут свой модератор (IMG:style_emoticons/default/smile.gif)

Я уж думал на QBasic ни кто не пишет. Это вроде как письмена острова Пасхи.