[tim537]

Задача: Создать программу для определения методом Монте-Карло площади данной фигуры.

Общий вид исходной формы на этапе проектирования (слева) и после выполнения расчета (справа).


Помогите хотя бы с вычислением площади, а кнопки, надписи и т.д. я сам уже смогу

[Bargest]

Открыл бы вику, почитал про этот самый метод монте-карло. Узнал бы, что достаточно

Код:

k := 0;
for i := 1 to MAX_N do
begin
  x := (random(200)-100)/100;
  y := (random(200)-100)/100;
  if PtInFig(x, y)
   inc(K);
end;
S := k / N * 4;

При том что функцию PtInFig написать тоже не трудно, что-то типа

Код:

result := false;
if (y <= 0) then
begin
  if (y >= -1) and (abs(x) <= 1)
    result := true;
end
else
  if (y <= 1)
    if (x <= 1-y) and (x >= -1)
     result := true;

Задача элементарнейшая, надо просто хоть раз включить голову. В программу собирай сам.

[tim537]

Сообщение от Bargest

Задача элементарнейшая, надо просто хоть раз включить голову. В программу собирай сам.

Я не знаю вообще как что делать. Мне нужен готовый проект или код. Для этого я и написал в этот раздел.

[Bargest]

Я не знаю вообще как что делать. Мне нужен готовый проект или код. Для этого я и написал в этот раздел.

Как-то не стыкуется c

Помогите хотя бы с вычислением площади, а кнопки, надписи и т.д. я сам уже смогу

То, что ты просил в первом посте, я выложил. Надо больше - придется ждать горааздо дольше.

[tim537]

То, что ты просил в первом посте, я выложил. Надо больше - придется ждать горааздо дольше.

Да, если можно, а я подожду - время есть

[Aristarh Dark]

Сообщение от tim537

Да, если можно, а я подожду - время есть

опупеть, люди тупо ждут пока за них сделают работу...

сутки на объяснения и увещевания - далеее: все в бан

[angvelem]

Aristarh, может хватит свирепствовать? Хоть на темы смотри. Эта - Код на шару. Сами для этого просили создать.

[lmikle]

Сообщение от angvelem

Aristarh, может хватит свирепствовать? Хоть на темы смотри. Эта - Код на шару. Сами для этого просили создать.

Ну и зря просили.
ИМХО, конечно, но считаю данную тему скорее вредной, нежели полезной.

[angvelem]

Сообщение от lmikle

... но считаю данную тему скорее вредной, нежели полезной.

Вот с этим полностью согласен. Знаний этот раздел никому не добавляет.

[tim537]

Ну что, видимо не поможет никто?

[M.A.D.M.A.N.]

Сообщение от tim537

Ну что, видимо не поможет никто?

Никто и не обязан.

[tim537]

Сообщение от M.A.D.M.A.N.

Никто и не обязан.

Естественно. Так и хочется сказать что вы кэп)

[RusMaXXX]

tim537 почитай тут: http://schoolkam.narod.ru/info/monte.htm и вот ещё http://festival.1september.ru/articles/104286/

не умеешь "кодить", хотя бы гуглить научись))))

[Bargest]

но считаю данную тему скорее вредной, нежели полезной.

А имхо как раз полезная: те, кому не интересно изучать предмет, его изучать и не будут. Хоть из шкуры вон вылези, ничего не добиться. Максимум можно заставить человека изобразить интерес, чтобы ему было проще разводить на готовые задания. Только все равно, все, что он узнает (если таковое и будет), он забудет на следующий день, отмечая в пивной сдачу сессии.
Зато темы "сделайте мне..." меньше засоряют остальные ветки форума.

[lmikle]

Сообщение от Bargest

Зато темы "сделайте мне..." меньше засоряют остальные ветки форума.

Вот только разве ради этого...