Построение противопожарной системы с использованием беспроводной технологии требует инвестиций, которые в первую очередь будут направлены на приобретение зарубежного оборудования. Данная система не является новшеством и не предлагает кардинальных изменений в общий принцип пожарной безопасности, она лишь модернизирует существующую системы, дополняя беспроводными модулями Zigbee. Техническое обслуживание и мониторинг сети будут проводить местные кадры. Для организации данной системы закупается оборудование, на общую сумму 180745 тг. (таблицы5.2 и 5.3).

Перечень аппаратного и программного обеспечения, необходимого для разработки устройства, и их стоимость представлены в таблицах 5.2 и 5.3.

Таблица 5.2 - Оборудование мониторинга сети

Таблица 5.3 - Оборудование для реализации сети

Капитальные вложения включают в себя стоимость оборудования, монтажных работ и транспортных услуг. Для определения величины капитальных затрат составляются сметы на приобретение оборудования.

Общие капитальные вложения рассчитываются по формуле:

К= К_о + К_м + К_тр + ПР , где(5.1)

здесь, К_о - капитальные вложения на приобретение оборудования, тенге;

К_м - капитальные вложения на монтажные работы, тенге;

К_тр - капитальные вложения на транспортные расходы, тенге;

ПР - капитальные вложения на предпроектные работы (маркетинговая деятельность, заработная плата сотрудников), тенге.

Затраты на монтажные работы по установке оборудования учитывают все виды инсталляционных работ, включая установку модулей, настройка контроллеров и т.п.

Стоимость монтажа оборудования вычисляется из принятых норм как 5-10 % от стоимости оборудования. Транспортные расходы учтены в соответствии с тарифами на услуги почтовой службы «Казпочта». Так как оборудование с весом до 5 кг везут из России, то стоимость услуги будет 6505 тенге.

Затраты на монтаж:

К_м= 5% • К_о;(5.2)

К_м = 0,05• 180745= 9037 тг.,

Транспортные расходы: К_тр= 6505

К предпроектным работам отнесем затраты на создание документации и инструкции оборудования и регистрацию необходимых документов.

Таблица 5.4 - Капитальные затраты на реализацию противопожарной системы.

Таким образом, для разработки противопожарной системы на небольших объектах требуются капитальные вложения в размере 214,396 тг.

Заключение

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls,math;

type

TForm1 = class(TForm)

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

Edit4: TEdit;

Edit5: TEdit;

Edit6: TEdit;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

Label6: TLabel;

Label7: TLabel;

Edit7: TEdit;

Label8: TLabel;

Edit8: TEdit;

Label9: TLabel;

Label10: TLabel;

Edit9: TEdit;

Edit10: TEdit;

Label11: TLabel;

Label12: TLabel;

Label13: TLabel;

Label14: TLabel;

Edit11: TEdit;

Edit12: TEdit;

Edit13: TEdit;

Label15: TLabel;

Label16: TLabel;

Edit14: TEdit;

Edit15: TEdit;

Edit16: TEdit;

Label19: TLabel;

Label21: TLabel;

Label17: TLabel;

Label20: TLabel;

Edit17: TEdit;

Button1: TButton;

Button2: TButton;

Label18: TLabel;

Label21: TLabel;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

var

F, Pm, Pv, SOM, L1, L2, R1, R2, n, La, Y, FSL, D, Pr, Pl, N0, N01:real;

begin

F:=StrToFloat(edit1.text);

Pm:=StrToFloat(edit2.text);

Pv:=StrToFloat(edit3.text);

SOM:=StrToFloat(edit4.text);

L1:=StrToFloat(edit5.text);

Продолжение приложения А

L2:=StrToFloat(edit6.text);

R1:=StrToFloat(edit7.text);

R2:=StrToFloat(edit8.text);

n:=StrToFloat(edit9.text);

pi:=3.14;

Y:=Pv-Pm-L1-L2;

FSL:=Y-SOM;

La:=300/F;

D:=10*exp(FSL/20-33/20-log(F));

Pr:=(Pv*1*1*La*La)/sqr(4*pi)*sqr(D);

Pl:=20*log(F)+20*log(D)-28;

N0:=1.3803*0.001*T;

N01:=20*log10(N0);

Edit10.text:=FloatToStr(Y);

edit11.text:=FloatToStr(FSL);

edit12.text:=FloatToStr(La);

edit13.text:=FloatToStr(D);

edit14.text:=FloatToStr(Pr);

edit15.text:=FloatToStr(Pl);

edit16.text:=FloatToStr(N0);

edit17.text:=FloatToStr(N01);

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

form1.Close;

end;

end.

Приложение Б

План помещения

Размещено на Allbest.ru