разработать программу паскаль abc

Для функции разработать и протестировать программу, выполняющую:
1. нахождение всех действительных корней уравнения на отрезке [a; b], если таковые имеются (решение соответствующего уравнения выполнить с точностью до e=0,0001 одним из численных методов: дихотомии, хорд, касательных) не более, чем за 20 итераций.
2. вычисление определенного интеграла f(x) на интервале табулирования [a; b] одним из перечисленных методов: правых прямоугольников, средних прямоугольников, левых прямоугольников, трапеций, Симпсона;
функция
x4 + 2x3 – x – 1 = 0 [0, 1] Хорд Средних прямоугольников
выполнение с блок схемой