Помогите разобраться с алгоритмом погрешности

← →
zhekan © (2007-03-19 09:48) [0]

Здравствуйте уважаемые эксперты.
У меня такой вопрос:
Программа для имитационного моделирования работы машиностроительного цеха, а проблема в том, что я не могу реализовать проверку допустимости брака. Вот кусочек задания:
На первом станке брак допускается при обработке 4% деталей, на втором - при обработке 8%. Все детали, при обработке которых допущен брак, возвращаются для устранения брака на первый станок. Операция по устранению брака занимает от 3 до 5 мин; брак удается устранить в 95% случаев.
Проблема ещё в том, что в ней помимо данных о детали и станках, задаётся время, в течении которого будет идти производство, а значит все цифры скользящие! Даже те 4%, 8% и время устранения брака, т.к. они задаются перед расчётом, т.е. конечное число деталей будет известьно уже в конце всех расчётов, а это уже поздно!
Если не очень корректно или не ясно задал вопрос, ты ниже полное задание:
На обрабатывающий участок цеха поступают детали. Интервал между моментами поступления деталей составляет в среднем 10 мин (экспоненциаль-ная случайная величина). Через каждые два часа поступление деталей прерыва-ется ровно на 15 мин; обработка деталей, уже поступивших на участок, в это время не прекращается. Первая операция по обработке деталей выполняется на одном из двух станков: СТ1 или СТ2 . Время обработки деталей - гауссовская случайная величина. Обработка детали на станке СТ1 занимает в среднем 4 мин, на СТ2 - 6 мин (среднеквадратическое отклонение - 1 мин). На станке СТ1 брак допускается при обработке 4% деталей, на СТ2 - при обработке 8%. Все детали, при обработке которых допущен брак, возвращаются для устранения брака на станок СТ1. Операция по устранению брака занимает от 3 до 5 мин; брак удается устранить в 95% случаев.
Вторая операция по обработке деталей выполняется на станке СТ3 или СТ4 (станки однотипные); станок СТ4 подключается только в случаях, когда в накопителе перед станком СТ3 оказывается более трех деталей. Длительность второй операции - гауссовская случайная величина; в среднем операция зани-мает 10 мин (среднеквадратическое отклонение - 1 мин).
Затраты, связанные с одной минутой работы станков, следующие: СТ1 - 50 центов, СТ2 - 40 центов, СТ3 и СТ4 - 60 центов. Затраты, связанные с одной минутой простоя каждого из станков, составляют 30 центов. Материал для из-готовления одной детали стоит 8 долл. Детали продаются по цене 25 долл.
Необходимо разработать имитационную программу для анализа процесса работы уча-стка за 8 часов.

← →
Kolan © (2007-03-19 09:57) [1]

Многа букаф, асилил половину, какжтся Delphi нипричем, надо сначала на листе бумаги научится решать&#133

← →
ЮЮ © (2007-03-19 10:04) [2]

> Даже те 4%, 8% и время устранения брака, т.к. они задаются
> перед расчётом, т.е. конечное число деталей будет известьно
> уже в конце всех расчётов, а это уже поздно!

Для иммитации, ИМХО, достаточно ( и не важно сколько фактически будет произведено lеталей на 1-м станке) :
IsWrong := Random(99) < 4

← →
Jeer © (2007-03-19 12:18) [3]

Спрашивается, зачем придуман GPSS ?

> Jeer
, про GPSS я знаю, но мне это не подходит, у меня другое задание!

> zhekan © (19.03.07 18:55) [4]

Тогда реализуй нечто похожее на GPSS: с очередями, накопителями, устройствами, сбором статистики и т.п.

По поводу моделирования вероятности событий с равномерным распределением см. ЮЮ © (19.03.07 10:04) [2] с поправкой

isWrong: boolean;

isWrong := (Random(100) < 4);

или оформить функцией

function isEvent(Value: integer): boolean;
begin
Result := (Random(100) < Value);
end;

Помогите разобраться с алгоритмом погрешности Найти похожие ветки