Определённый интеграл (метод Симпсона)

 x f x 2 ^ :

// подынтегральная функция

 a 1 :

// нижний предел интегрирования

 b 5 :

// верхний предел интегрирования

 n 100 :

// точность вычисления

 h b a - n / : int 1 3 / h 2 / a f b f + ( * h a k h * + f k 1 n 1 - sum * + ( * 2 3 / h * a h 2 / - k h * + f k 1 n sum * + : int 41,3333 =

// ответ

Проверка:

 x f x a b int 41,3333 =