Реферат: Центральная Предельная Теорема и её приложения. Решение Определенного интеграла методом Монте-Карло

randomize;

clrscr;

writeln('Vvod znachenii');

write('a = ');Read(a);

write('b = ');Read(b);

write('c = ');Read(c);

write('d = ');Read(d);

write('n = ');Read(n);

writeln('--------------------------------');

writeln('| k | integral | vsego ispitani|');

for j:=1 to 9 do

begin

I:=0;

for j1:=1 to n do

begin

x:=a+(b-a)*random;

y:=c+(d-c)*random;

I:=I+sqr(x)+sqr(y)*y;

end;

I:=I*(b-a)*(d-c)/n;

writeln('--------------------------------');

writeln('| ', j, ' | ', i:2:6, ' | ', n, ' |');

{writeln(' Integral = ', i:6:7, ' vsego ispitani = ', n, ' popalo pod function = ', n1);}

end;

writeln('--------------------------------');

readkey;

end.