Pascal, вычислить интеграл по формуле Симпсона

[Shurara]

Вычислить интеграл  от 0 до 1 (3*х^2*x+1) с точностью     е=10^-3 по формуле Симпсона/

П.С.: с комментариями, пожалуйста)))
      спасибо)

[Данила]

П.С.: с комментариями, пожалуйста)))

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