Форум программистов, компьютерный форум CyberForum.ru

Метод Монте - Карло, вычесление объема и интеграла - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Определить, сколько нулей лежит между минимальным и максимальным значениями массива http://www.cyberforum.ru/cpp-beginners/thread1036991.html
Ребята помогите пожалуйста решить задачу. Собственно задача: Определить, сколько нулей лежит между минимальным и максимальным значениями массива Н.
C++ Создать класс "Триада" и перегрузить некоторые операторы 1) Создать базовый класс "Триада" (три числа). Определить методы: конструктор, виртуальные функции увеличения полей на 1 и вывода информации на экран. 2) Для АТД из первого задания перегрузить операторы () (определяет наибольшее число из Триады), <<, > (A>B возвращает количество элементов Триады из класса А, которые больше чем элементы Триады из класса В). Времени в обрез, идей 0... http://www.cyberforum.ru/cpp-beginners/thread1036971.html
Создать в производном классе метод Run C++
Создать в производном классе метод Run, определяющий значение х1*х2/у
C++ Создать массив структур из 10 элементов
вот программа #include <stdio.h> #include <stdlib.h> #include <time.h> struct human { private: char *_surname; char *_name;
C++ Вставить один код в другой http://www.cyberforum.ru/cpp-beginners/thread1036940.html
всем привет у меня возникла проблема. как подключить один код к другому. у меня есть 2 кода которые нужно соединить. но не пойму как это делать. #include <iostream> #include <string.h>
C++ построить график функции y=ln x построить график функции y=ln x подробнее

Показать сообщение отдельно
Ivan11111
0 / 0 / 0
Регистрация: 27.11.2013
Сообщений: 4
11.12.2013, 12:21     Метод Монте - Карло, вычесление объема и интеграла
Всем привет. Надо сочитать объем и вычислить интеграл методом монте - карло:
1)Вычислить методом Монте-Карло объем области, являющейся пересечением единич-
ного шара и области, ограниченной конусом: http://www.cyberforum.ru/cgi-bin/latex.cgi?{x}^{2} + http://www.cyberforum.ru/cgi-bin/latex.cgi?{y}^{2} < http://www.cyberforum.ru/cgi-bin/latex.cgi?{z}^{2}, z > 0; вывести оценку и
погрешность.
2)Вычислить методом Монте-Карло интеграл от 0 до бесконечности
http://www.cyberforum.ru/cgi-bin/latex.cgi?{e}^{-{x}^{2}/2}*cos(x)dx вывести точное значение(http://www.cyberforum.ru/cgi-bin/latex.cgi?{\frac{\pi }{2*e}}^{1/2}), оценку и погрешность.

main.cpp
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#include "stdafx.h"
#include <math.h>
#include <conio.h>
#include <iostream>
#include "rand.h"
#include "rnnorm.h"
using namespace std;
 
void t24()
{   double s=0, s2=0, p1=8;
    int N=100000;
    for(int i=0; i<N; i++)
    { double x=2*rnunif()-1,
             y=2*rnunif()-1,
             z=2*rnunif();
      if(x*x+y*y<z*z) 
      { s+=p1;
        s2+=p1*p1; 
      }
    }
    double a=s/N, d=s2/N-a*a, r=3*sqrt(d/N);
    cout<<"test 24:"<<' '<<a<<' '<<r<<endl;
}
 
void t25()
{   double s=0, s2=0;
    int N=100000;
    for(int i=0; i<N; i++)
    { double x=rnexp(),
             y=cos(x);
      s+=y;
      s2+=y*y; 
    }
    double a=s/N, d=s2/N-a*a, r=3*sqrt(d/N);
    cout<<"test 25:"<<' '<<sqrt(M_PI/(2*M_E))<<' '<<a<<' '<<r<<endl;
}
 
int _tmain(int argc, _TCHAR* argv[])
{   rninit(1);
    
    t24();
    t25();
 
    _getch();
    return 0;
}


rand.cpp
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
#include "stdafx.h"
#include <math.h>
static unsigned long int iu, iuhold, mult=663608941l;
double rnunif ()
{
 const double flt = 0.232830643654e-9;
 iu *= mult;
 return (flt*iu);
}
 
double rnexp()
{ return -log(rnunif());
}
 
void rninit ( long int iufir)
{
 iu = ( ( iufir%2 ) ? iufir : iufir + 1 );
 iuhold = iu;
}
 
void rnrest ()
{ rninit (iuhold); 
}
 
void rnconst ( unsigned long int multnew)
{
 int rest = multnew % 5;
 if ( (rest != 5) || (rest != 3) )
  mult = multnew - rest + 5;
 else
  mult = multnew;
}
 
unsigned long int rnlast ()
{ return ( iu ); }
 
unsigned long int rnfirst ()
{ return ( iuhold ); }


rand.h
Кликните здесь для просмотра всего текста
C++
1
2
3
void rninit(long int);                  
double rnunif();                     
double rnexp();


С объемом вроде бы все впорядке, а интеграл неполучается.
Заранее спасибо.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 11:05. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru