Вычисление интегралов методом Монте-Карло

Вычисление определенного интеграла методом.= f (x) dx по методу Монте-Карло.(x+1) dx = 6 ; (x*x) dx = 9; (По методу Ньютона-Лейбница) .В программе g (x) = 1/ (b-a) .= (1/n) * (f (xi)) / (g (xi)) ,где n - число испытаний ;g (x) - плотность.Программа написана на языке.Turbo Pascal 7.Var k,p,s,g,x,Integral : real.= a + g* (b-a) ;{По этой формуле получается произвольная величина из [a;b] }.Integral:= (1/n) *k*s.