Написать программу в Делфи решающая функция корня уравнения от а до в методом половинного деления

Готово!
Вот результат работы программы:

Начальное значение: 0.00000000, 2.00000000
Шаг 1 - значение: 1.00000000, 2.00000000, f(X) = -0.09147098
Шаг 2 - значение: 1.00000000, 1.50000000, f(X) = 0.25250501
Шаг 3 - значение: 1.00000000, 1.25000000, f(X) = 0.05101538
Шаг 4 - значение: 1.12500000, 1.25000000, f(X) = -0.02726759
Шаг 5 - значение: 1.12500000, 1.18750000, f(X) = 0.01006308
Шаг 6 - значение: 1.15625000, 1.18750000, f(X) = -0.00904914
Шаг 7 - значение: 1.15625000, 1.17187500, f(X) = 0.00039449
Шаг 8 - значение: 1.16406250, 1.17187500, f(X) = -0.00435536
Шаг 9 - значение: 1.16796875, 1.17187500, f(X) = -0.00198745
Шаг 10 - значение: 1.16992188, 1.17187500, f(X) = -0.00079824
Шаг 11 - значение: 1.17089844, 1.17187500, f(X) = -0.00020232
Шаг 12 - значение: 1.17089844, 1.17138672, f(X) = 0.00009598
Шаг 13 - значение: 1.17114258, 1.17138672, f(X) = -0.00005320
Шаг 14 - значение: 1.17114258, 1.17126465, f(X) = 0.00002138
Шаг 15 - значение: 1.17120361, 1.17126465, f(X) = -0.00001591
Шаг 16 - значение: 1.17120361, 1.17123413, f(X) = 0.00000274
Шаг 17 - значение: 1.17121887, 1.17123413, f(X) = -0.00000659
Шаг 18 - значение: 1.17122650, 1.17123413, f(X) = -0.00000193
Шаг 19 - значение: 1.17122650, 1.17123032, f(X) = 0.00000041
Шаг 20 - значение: 1.17122841, 1.17123032, f(X) = -0.00000076
Шаг 21 - значение: 1.17122936, 1.17123032, f(X) = -0.00000018
Шаг 22 - значение: 1.17122936, 1.17122984, f(X) = 0.00000011
Шаг 23 - значение: 1.17122960, 1.17122984, f(X) = -0.00000003
Шаг 24 - значение: 1.17122960, 1.17122972, f(X) = 0.00000004
Шаг 25 - значение: 1.17122960, 1.17122966, f(X) = 0.00000000
Шаг 26 - значение: 1.17122963, 1.17122966, f(X) = -0.00000001
Шаг 27 - значение: 1.17122965, 1.17122966, f(X) = 0.00000000
Шаг 28 - значение: 1.17122965, 1.17122965, f(X) = 0.00000000
Шаг 29 - значение: 1.17122965, 1.17122965, f(X) = 0.00000000
Шаг 30 - значение: 1.17122965, 1.17122965, f(X) = 0.00000000
Шаг 31 - значение: 1.17122965, 1.17122965, f(X) = 0.00000000
Найден корень: 1.17122965
Проверка: x - sin x - 0.25 = 0.00000000
Вычисление завершено.