Моделирование работы ЭВМ в среде GPSS
Контрольная работа - Компьютеры, программирование
Другие контрольные работы по предмету Компьютеры, программирование
?ля вычисления вероятности безотказной работы программного обеспечения. Подставим в формулу (16) значение времени согласно индивидуальному заданию t=1000:
.
2.5 Вычисление вероятности безотказной работы оператора
Вероятность безошибочного функционирования оператора задается двойной экспоненциальной моделью:
; (17)
где - необходимое время работы оператора при выполнении задачи комплексом, = 130 час. - время обучения оператора, ?=410-6 [1/час] - интенсивность совершения ошибок оператором в течение времени его обучения, ?= 1,510-5 [1/час]
Подставив все в формулу (17) получим:
; (18)
Формула (18) предназначена для вычисления вероятности безотказной работы оператора. Подставим в формулу (18) значение времени согласно индивидуальному заданию t=1000:
2.6 Вычисление вероятности безотказной работы аппаратно-программного комплекса
Формула вероятности безотказной работы аппаратно-программного комплекса, ввиду того, что отказы аппаратуры и программного обеспечения и ошибки оператора взаимно независимы, будет иметь следующий вид:
; (19)
3. Вычисление вероятности безотказной работы в течении времени
В задании требуется рассчитать вероятность безотказного функционирования аппаратно-программного комплекса в течение 1000 часов. Для этого подставим значения полученные при вычислении формул (4), (9), (12), (15) и (18) в формулу (19) и получим:
Подставим все в формулу (16) и получим:
Получаем ответ: 0,831, т.е. вероятность безотказной работы аппаратно программного комплекса в течении 1000 часов равна 0,831.
4. Вычисление средней наработки на отказ аппаратно-программного комплекса
Получаем ответ: 1386 часов, т.е. среднее время наработки на отказ аппаратно-программного комплекса равна 1386 часам.
Приложение
ScreenSize;, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, DsgnIntf;= procedure (Sender: TObject; ErrorCode:word) of object;= class(TComponent): TNotifyEvent;: byte;: word;: word;: boolean;: TErrorSwitchNotifyEvent;SetBitsCount (const Value: byte);SetHeight (const Value: word);SetWidth (const Value: word);SetAutoSwitch (const Value: boolean);
{Private declarations}
{Protected declarations}
{Public declarations}Create (anOwner:TComponent); override;Destroy; override;Switch;RestoreMode;
{Published declarations}OnBeforeSwitch:TNotifyEvent read FOnBeforeSwitch write FOnBeforeSwitch;OnErrorSwitch:TErrorSwitchNotifyEvent read FOnErrorSwitch write FOnErrorSwitch;Width:word read FWidth write SetWidth;Height:word read FHeight write SetHeight;BitsCount:byte read FBitsCount write SetBitsCount;AutoSwitch:boolean read FAutoSwitch write SetAutoSwitch;;ChangeDisplaySettingsX (lpDevMode: Pointer; dwFlags: DWORD): Longint; stdcall;Register;Register;(Ray Adams, [TScreenSize]);;ChangeDisplaySettingsX; external user32 name ChangeDisplaySettingsA;
{TScreenSize}TScreenSize. Create (anOwner: TComponent);Create(anOwner);:=640;:=480;:=16;;TScreenSize. Destroy;(nil, 0);Destroy;;TScreenSize. RestoreMode;(nil, 0);;TScreenSize. SetAutoSwitch (const Value: boolean);:= Value;;TScreenSize. SetBitsCount (const Value: byte);:= Value;;TScreenSize. SetHeight (const Value: word);:= Value;;TScreenSize. SetWidth (const Value: word);:= Value;;TScreenSize. Switch;:TDeviceMode;:word;.dmPelsWidth:=FWidth;.dmPelsHeight:=FHeight;.dmBitsPerPel:=FBitsCount;.dmDisplayFlags:=DM_BITSPERPEL or DM_PELSWIDTH or DM_PELSHEIGHT;.dmSize:=SizeOf(dMode);:=ChangeDisplaySettings (dmode, 0);res<>DISP_CHANGE_SUCCESSFUL then if assigned(FOnErrorSwitch) then FOnErrorSwitch (Self, res);;.