


Помогите пожалуйста составить программу по следующему заданию в World Excel Visual Basic(VBA):"Линейное программирование
программирование. Метод Монте-Карло. В квадрате с дополнительными ограничениями."
Должен получиться график, на нем квадрат с границами, ограничивающие его. Программа должна находить случайные числа, которые входят в область квадрата.
Прошу вас написать мне программу, не объяснение ее и дурацких ссылок с объяснениями, только написаная программа, так как по времения ограничен, должен сдать зачет по Информатике до 17 декабря 2010 года собствено.
вот ты обвиняешь людей в дурацких ссылках а сам по дурацки написал условие: что это за дополнительные ограничения в квадрате??? ?
Когда же вы поймете, что правильно и подробно написанное условие - это треть решения задачи ?-)
Соответственно вам лень писать условие - людям лень тогда решать)) )
Я понял условие задачи так:
Дан генератор случайных чисел от 0 до B
пара последовательных чисел представляют собою координаты точек попадающих в этот квадрат.
внутри его находится квадрат со стороной А меньше В
Тогда по методу Монте-Карло отношение площадей квадратов равно отношению числа точек попавших в квадрат А из числа всех точек.
Решение:
Sub ppp()
A = 10
B = 15
NNB = 0
NNA = 0
For ii = 1 To 1000
xx = Rnd() * B
yy = Rnd() * B
NNB = NNB + 1
If (xx <= A) And (yy <= A) Then
NNA = NNA + 1 ' вот условие попадания в квадрат А
End If
Cells(ii, 1) = NNA / NNB
Next ii
End Sub