Директивы начинаются символом $, который стоит сразу за открывающей фигурной скобкой.

В качестве ограничителей комментария могут также использоваться пары символов (*, *) и //. Скобки (*...*) используются подобно фигурным скобкам т. е. комментарием считается находящийся в них фрагмент текста, а символы // указывают компилятору, что комментарий располагается за ними и продолжается до конца текущей строки:

{Это комментарий}

(*Это тоже комментарий*)

//Все символы до конца этой строки составляют комментарий

Слово Program со следующим за ним именем программы и точкой с запятой образуют заголовок программы. За заголовком следует раздел описаний, в котором программист (или Delphi) описывает используемые в программе идентификаторы.

Идентификаторы обозначают элементы программы, такие как типы, переменные, процедуры, функции (об элементах программы мы поговорим чуть позже). Здесь же с помощью предложения, которое начинается зарезервированным словом uses (использовать) программист сообщает компилятору о тех фрагментах программы (модулях), которые необходимо рассматривать как неотъемлемые составные части программы и которые располагаются в других файлах. Строки

uses

Forms, Unit1 in 'Unitl.pas' {fmExample};

указывают, что помимо файла проекта в программе должны использоваться модули Forms И Unit1. модуль Forms является стандартным (т. е. уже известным Delphi), а модуль Unit1 - новым, ранее неизвестным, и Delphi в этом случае указывает также имя файла с текстом модуля (in 'uniti.pas') и имя связанного с модулем файла описания формы {fmExample}.

Собственно тело программы начинается со слова begin (начать) и ограничивается терминатором end с точкой.

Тело состоит из нескольких операторов языка Object Pascal. В каждом операторе реализуется некоторое действие - изменение значения переменной, анализ результата вычисления, обращение к подпрограмме и т. п.

Объектом называется специальным образом оформленный фрагмент программы, заключающий в себе данные и подпрограммы для их обработки [26].

Данные называются полями объекта, а подпрограммы - его методами.

Объект в целом предназначен для решения какой-либо конкретной задачи и воспринимается в программе как неделимое целое (иными словами, нельзя из объекта “выдернуть” отдельное поле или метод). Объекты играют чрезвычайно важную роль в современных языках программного продукта. Они придуманы для того, чтобы увеличить производительность труда пользователя и одновременно повысить качество разрабатываемых им программ. Два главных свойства объекта - функциональность и неделимость - делают его самостоятельной или даже самодостаточной частью программы и позволяют легко переносить объект из одной программы в другую.

Разработчики Delphi придумали сотни объектов, которые можно рассматривать как кирпичики, из которых программист строит многоэтажное здание программы. Такой принцип построения программ называется объектно-ориентированным программированием (ООП).

В объекте Application собраны данные и подпрограммы, необходимые для нормального функционирования Windows-программы в целом. Delphi автоматически создает объект-программу Application для каждого нового проекта. Строка

Application.Initialize;

означает обращение к методу Initialize объекта Application. Прочитав эту строку, компилятор создаст код, который заставит процессор перейти к выполнению некоторого фрагмента программы, написанного для нас разработчиками Delphi. После выполнения этого фрагмента (программисты говорят: после выхода из подпрограммы) управление процессором перейдет к следующей строке программы, в которой вызывается метод CreateForm и т. д.

Структура модуля

Модули - это программные единицы, предназначенные для размещений фрагментов программ. С помощью содержащегося в них программного кода реализуется вся поведенческая сторона программы.

Любой модуль имеет следующую структуру: заголовок секция интерфейсных объявлений секция реализации терминатор Заголовок открывается зарезервированным словом Unit за которым следует имя модуля и точка с запятой.

Секция интерфейсных объявлений открывается зарезервированным словом Interface, a секция реализации - словом implementation.

Терминатором модуля, как и терминатором программы, является end с точкой. Следующий фрагмент программы является синтаксически правильным вариантом модуля:

unit Unit1;

interface

// Секция интерфейсных объявлений

implementation

// Секция реализации

end.

В секции интерфейсных объявлений описываются программные элементы (типы, классы, процедуры и функции), которые будут “видны” другим программным модулям, а в секции реализации раскрывается механизм работы этих элементов. Разделение модуля на две секции обеспечивает удобный механизм обмена алгоритмами между отдельными частями одной программы.

Он также реализует средство обмена программными разработками между отдельными пользователями. Получив откомпилированный “посторонний” модуль, пользователь получает доступ только к его интерфейсной части, в которой, как уже говорилось, содержатся объявления элементов.

Детали реализации объявленных процедур, функций, классов скрыты в секции реализации и недоступны другим модулям.

Если щелкнуть по закладке Unit1 окна кода, можно увидеть такой текст:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls,

Forms, Dialogs, StdCtrls, Buttons, ExtCtrls;

type

TfmExample = class(TForm)

Panel1: TPanel;

bbRun: TBitBtn;

bbClose: TBitBtn;

edinput: TEdit;

IbOutput: TLabel;

mmOutput: TMemo;

private

{ Private declarations } public

{ Public declarations } end;

var

fmExample: TfmExample;

implementation

$R *.DFM}

end.

Весь этот текст сформирован Delphi, но в отличие от файла проекта пользователь может его изменять, придавая программе нужную функциональность. В интерфейсной секции описан один тип (класс - fmExample) и один объект (переменная fmExample).

Вот описание класса:

type

TfmExample = class(TForm)

Panell: TPanel;

bbRun: TBitBtn;

bbClose: TBitBtn;

edinput: TEdit;

IbOutput: TLabel;

mmOutput: TMemo;

private

{ Private declarations } public

{ Public declarations } end;

Классы служат основным инструментом реализации мощных возможностей Delphi.

Класс является образцом, по которому создаются объекты, и наоборот, объект - это экземпляр реализации класса. Образцы для создания элементов программы в Object Pascal называются типами, таким образом, класс TfmExamplel -это тип.

Перед его объявлением стоит зарезервированное слово type (тип), извещающее компилятор о начале раздела описания типов.

Стандартный класс TForm реализует все нужное для создания и функционирования пустого Windows-окна. Класс TfmExamplel порожден от этого класса, о чем свидетельствует строка TfmExample = class(TForm) в которой за зарезервированным словом class в скобках указывается имя родительского класса.

Термин “порожден” означает, что класс TfmExample унаследовал все возможности родительского класса TForm и добавил к ним собственные в виде дополнительных компонентов, которые, как вы помните, мы вставили в форму fmExample.

Перечень вставленных нами компонентов и составляет значительную часть описания класса.

Свойство наследования классами-потомками всех свойств родительского класса и обогащения их новыми возможностями является одним из фундаментальных принципов объектно-ориентированного программирования.

От наследника может быть порожден новый наследник, который внесет свою лепту в виде дополнительных программных заготовок и т. д. В результате создается ветвящаяся иерархия классов, на вершине которой располагается самый простой класс TObject (все остальные классы в Delphi порождены от этого единственного прародителя), а на самой нижней ступени иерархии - мощные классы-потомки, которым по плечу решение любых проблем.

2.2 Структура проекта

Файловая структура:

Project2.exe- исполняемый файл

Project2.dpr-файл проекта

Project2.res-файл ресурсов пакета

Unit2.dfm, -файл ресурсов форм

Unit2.dcu -файлы скомпилированных модулей, содержат пакет стандартных компонент, использумых модулей

Unit2.pas, -файл модулей.

Form1 - главная форма на которой расположены следующие компоненты:

Image1 - поля для вывода графики;

Panel1 - на панели отображаются методы решения программы;

BitBtn1 - кнопка для расчёта;

Edit1, Edit2, Edit3, Edit4 - поля для ввода информации;

Label1, Label2, Label3… Label33 - поля для вывода информации;

GroupBox1, GroupBox2, GroupBox3, GroupBox4 - панели для отображения групп объектов;

ListBox1, ListBox2, ListBox3… ListBox14 - поля для отображения информации;

Процедуры:

procedure BitBtn1Click(Sender: TObject) - выполняет расчёты;

procedure Timer1Timer(Sender: TObject) - отображает время;

procedure FormCreate(Sender: TObject) - отображает путь к файлу;

procedure CheckBox1Click(Sender: TObject) - отображает элементы для вывода расчётов;

procedure CheckBox2Click(Sender: TObject) - отображает элементы для вывода расчётов;

procedure CheckBox3Click(Sender: TObject) - отображает элементы для вывода расчётов;

procedure CheckBox4Click(Sender: TObject) - отображает элементы для вывода расчётов;

unit Unit2;

Листинг программы:

procedure TForm1.BitBtn1Click(Sender: TObject);

var

st:string;

y123,y124,max:integer;

z: array[1..10,1..10] of integer;

matr_sed: array[1..10,1..10] of integer;

matr_ger: array[1..10,1..10] of integer;

matr_ger2: array[1..10,1..10] of real;

min_mas:array[1..10] of integer;

min_mas_hod:array[1..10] of real;

min_mas_ger:array[1..10] of real;

max_mas:array[1..10] of integer;

vich_mas:array[1..10] of real;

mas_par:array[1..10] of real;

mas_bair:array[1..10] of real;

max_el_stol:array[1..10] of integer;

x,j:integer;

st1,n,u:string;

y,dl,min:integer;

min1,c1,c:variant;

max2,znach,znach1,param_bair,ver:real;

begin

listbox1.Clear;

listbox2.Clear;

listbox3.Clear;

listbox4.clear;

listbox5.Clear;

listbox6.Clear;

listbox7.Clear;

listbox8.clear;

listbox14.clear;

dt:=InputBox('Размер матрицы', 'Количество исследований-3','3');

kol:=strtoint(dt);

j:=1;

for x:=1 to kol do

begin

for y:=1 to kol do

begin

n:=inputbox('Введите элемент:'+inttostr(j),'','');

z[x,y]:=Strtoint(n);

j:=j+1;

end;

end;

////Вывод массива

y123:=0;

y124:=0;

st:='';

for y:=1 to kol do

begin

for x:=1 to kol do

begin

y123:=Length(inttostr(z[x,y]));

if (y123<6 ) then y124:=6-y123;

st1:=inttostr(z[x,y]);

for dl:=1 to y124 do

begin

st1:=' '+st1;

end;

st:=st+st1;

end;

listbox4.Items.Add(st);

st:='';

end;

if (Checkbox1.Checked=true) then

begin

////Минимальные

y:=1;

while y<=kol do

begin

x:=1;

min1:=z[x,y];

max:= z[x,y];

while x<=kol do

begin

if min1>z[x,y] then min1:=z[x,y];

if max<z[x,y] then max:=z[x,y];

x:=x+1;

end;

min_mas[y]:=min1;

max_mas[y]:=max;

y:=y+1;

end;

for x:=1 to kol do

begin

listbox1.Items.Add(inttostr(min_mas[x]));

end;

listbox1.Visible:=true;

max:=min_mas[1];

for x:=1 to kol do

begin

if (max<min_mas[x]) then max:=min_mas[x];

end;

edit1.text:=inttostr(max);

for x:=1 to kol do

begin

listbox2.Items.Add(inttostr(max_mas[x]));

end;

listbox2.Visible:=true;

end;

y123:=0;

y124:=0;

st:='';

for y:=1 to kol do

begin

for x:=1 to kol do

begin

y123:=Length(inttostr(z[x,y]));

if (y123<6 ) then y124:=6-y123;

st1:=inttostr(z[x,y]);

for dl:=1 to y124 do

begin

st1:=' '+st1;

end;

st:=st+st1;

end;

listbox4.Items.Add(st);

st:='';

end;

if (Checkbox1.Checked=true) then

begin

if (Checkbox2.Checked=true) then

begin

c:=InputBox('Критерий Гурвица', '','0,5');

Label32.Caption:=c;

c:=strtofloat(c);

c1:=1-c;

/////////Минимальный, максимальный массив

y:=1;

while y<=kol do

begin

x:=1;

min1:=z[x,y];

max:= z[x,y];

while x<=kol do

begin

if min1>z[x,y] then min1:=z[x,y];

if max<z[x,y] then max:=z[x,y];

x:=x+1;

end;

min_mas[y]:=min1;

max_mas[y]:=max;

y:=y+1;

end;

//////////////////////////////////////

for x:=1 to kol do

begin

vich_mas[x]:=min_mas[x]*c+max_mas[x]*c1;

end;

max2:= vich_mas[1];

for x:=1 to kol do

begin

if (max2<vich_mas[x]) then max2:=vich_mas[x];

end;

edit2.text:=floattostr(max2);

for x:=1 to kol do

begin

listbox3.Items.Add(floattostr(vich_mas[x]));

end;

end;

/////////////////Байеса-Лапласа

if (Checkbox3.Checked=true) then

begin

for x:=1 to kol do

begin

n:=inputbox('Введите параметр Байеса-Лапласа:','0.5,0.3,0.2','');

mas_par[x]:=StrtoFloat(n);

listbox14.Items.Add(n);

j:=j+1;

end;

znach1:=0;

y:=1;

while y<=kol do

begin

x:=1;

while x<=kol do

begin

znach:=0;

param_bair:=mas_par[x];

znach:=z[x,y]*param_bair;

znach1:=znach1+znach;

x:=x+1;

end;

mas_bair[y]:=znach1;

znach1:=0;

y:=y+1

end;

////Вывод в Box

for x:=1 to kol do

begin

listbox5.Items.Add(floattostr(mas_bair[x]));

end;

max2:= vich_mas[1];

for x:=1 to kol do

begin

if (max2<vich_mas[x]) then max2:=vich_mas[x];

end;

edit2.text:=floattostr(max2);

for x:=1 to kol do

begin

listbox3.Items.Add(floattostr(vich_mas[x]));

end;

end;

/////Поиск максимального значения

max2:=mas_bair[1];

for x:=1 to kol do

begin

if (max2<mas_bair[x]) then max2:=mas_bair[x];

end;

edit3.text:=floattostr(max2);

end;

////Критерий Сэвиджа

if (Checkbox4.Checked=true) then

begin

y:=1;

while y<=kol do

begin

x:=1;

max:= z[y,x];

while x<=kol do

begin

if max<z[y,x] then max:=z[y,x];

x:=x+1;

end;

max_el_stol[y]:=max;

y:=y+1;

end;

////////////////////////

y:=1;

while y<=kol do

begin

x:=1;

while x<=kol do

begin

matr_sed[y,x]:=max_el_stol[y]-z[y,x];

x:=x+1;

end;

y:=y+1;

end;

///////////

y123:=0;

y124:=0;

st:='';

y:=1;

while y<=kol do

begin

x:=1;

while x<=kol do

begin

y123:=Length(inttostr(matr_sed[x,y]));

if (y123<6 ) then y124:=6-y123;

st1:=inttostr(matr_sed[x,y]);

x:=x+1;

for dl:=1 to y124 do

begin

st1:=' '+st1;

end;

st:=st+st1;

end;

listbox7.Items.Add(st);

st:='';

y:=y+1;

end;

/////////////

listbox6.Clear;

for x:=1 to kol do

begin

listbox6.Items.Add(inttostr( max_el_stol[x]));

end;

///Максимальный

y:=1;

while y<=kol do

begin

x:=1;

max:= matr_sed[x,y];

while x<=kol do

begin

if max<matr_sed[x,y] then max:=matr_sed[x,y];

x:=x+1;

end;

max_mas[y]:=max;

y:=y+1;

end;

for x:=1 to kol do

begin

listbox8.Items.Add(inttostr(max_mas[x]));

end;

////////////

min:=max_mas[1];

for x:=1 to kol do

begin

if (min>max_mas[x]) then min:=max_mas[x];

end;

edit4.text:=inttostr(min);

end;

end;

procedure TForm1.Timer1Timer(Sender: TObject);

begin

statusbar1.Panels[0].Text:=TimeToStr(Time) ;

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

statusbar1.Panels[1].Text:=Application.ExeName;

end;

procedure TForm1.ApplicationEvents1Exception(Sender: TObject;

E: Exception);

begin

kol:=3;

end;

procedure TForm1.CheckBox1Click(Sender: TObject);

begin

form1.BitBtn1.Enabled:=true;

form1.Image1.Visible:=false;

listbox4.Visible:=true;

groupbox2.Visible:=true;

listbox1.Visible:=true;

edit1.Visible:=true;

if (Checkbox1.Checked=false) then

begin

listbox4.Visible:=false;

groupbox2.Visible:=false;

listbox1.Visible:=false;

edit1.Visible:=false;

end;

end;

listbox6.Clear;

for x:=1 to kol do

begin

listbox6.Items.Add(inttostr( max_el_stol[x]));

end;

min:=max_mas[1];

for x:=1 to kol do

begin

if (min>max_mas[x]) then min:=max_mas[x];

end;

edit4.text:=inttostr(min);

end;

end;

///Максимальный

y:=1;

while y<=kol do

begin

x:=1;

max:= matr_sed[x,y];

while x<=kol do

begin

if max<matr_sed[x,y] then max:=matr_sed[x,y];

x:=x+1;

end;

max_mas[y]:=max;

y:=y+1;

end;

for x:=1 to kol do

begin

listbox8.Items.Add(inttostr(max_mas[x]));

end;

procedure TForm1.CheckBox2Click(Sender: TObject);

begin

form1.BitBtn1.Enabled:=true;

form1.Image1.Visible:=false;

listbox4.Visible:=true;

groupbox1.Visible:=true;

listbox3.Visible:=true;

edit2.Visible:=true;

if (Checkbox2.Checked=false) then

begin

listbox4.Visible:=false;

groupbox1.Visible:=false;

listbox3.Visible:=false;

edit2.Visible:=false;

end;

end;

procedure TForm1.CheckBox3Click(Sender: TObject);

begin

form1.BitBtn1.Enabled:=true;

form1.Image1.Visible:=false;

listbox4.Visible:=true;

groupbox3.Visible:=true;

listbox14.Visible:=true;

listbox5.Visible:=true;

edit3.Visible:=true;

if (Checkbox3.Checked=false) then

begin

listbox4.Visible:=false;

groupbox3.Visible:=false;

listbox14.Visible:=false;

listbox5.Visible:=false;

edit3.Visible:=false;

end;

end;

listbox6.Clear;

for x:=1 to kol do

begin

listbox6.Items.Add(inttostr( max_el_stol[x]));

end;

///Максимальный

y:=1;

while y<=kol do

begin

x:=1;

max:= matr_sed[x,y];

while x<=kol do

begin

if max<matr_sed[x,y] then max:=matr_sed[x,y];

x:=x+1;

end;

max_mas[y]:=max;

y:=y+1;

end;

for x:=1 to kol do

begin

listbox8.Items.Add(inttostr(max_mas[x]));

end;

procedure TForm1.CheckBox4Click(Sender: TObject);

begin

form1.BitBtn1.Enabled:=true;

form1.Image1.Visible:=false;

listbox4.Visible:=true;

groupbox4.Visible:=true;

listbox7.Visible:=true;

listbox6.Visible:=true;

listbox8.Visible:=true;

edit4.Visible:=true;

if (Checkbox4.Checked=false) then

begin

listbox4.Visible:=false;

groupbox4.Visible:=false;

listbox7.Visible:=false;

listbox6.Visible:=false;

listbox8.Visible:=false;

edit4.Visible:=false;

end;

end;

min:=max_mas[1];

for x:=1 to kol do

begin

if (min>max_mas[x]) then min:=max_mas[x];

end;

edit4.text:=inttostr(min);

end;

end;

end.

2.3 Описание работы с программой

При запуске *.exe файла открывается программа «Принятие решений в условиях частичной неопределенности» (см. рисунок 1).

Рисунок 1. Основная форма

На основной форме программы расположена панель, на которой можно выбрать метод произведения расчётов (рисунок 2).

Рисунок 2. Панель выбора

Чтобы решить методом «Минимаксный» надо на панели поставить галочку напротив слова «Минимаксный», далее откроется панель, на которой отобразится результат. Затем необходимо нажать кнопку Рассчитать и в открытом окне вводим данные, по которым должен проводиться расчёт (рисунок 3).

Рисунок 3. Панель ввода размера матрицы

Далее по одному вводим элементы матрицы (рисунок 4).

Рисунок 4. Ввод элементов матрицы



Рисунок 5. Вывод результата.

Аналогичные действия совершаются для проведения расчётов по другим методам (рисунки 6, 7, 8).

Рисунок 6. Расчёты по методу Гурвица



Рисунок 7. Расчёты по методу Байеса Лаплас

Рисунок 7. Расчёты по методу Сэдвиджа

3. Охрана труда и безопасность жизнедеятельности

Охрана труда - система законодательных актов, социально-экономических, организационных, технических, гигиенических и лечебно-профилактических мероприятий и средств, обеспечивающих безопасность, сохранение здоровья и работоспособности человека в процессе труда.

Научно-технический прогресс внес серьезные изменения в условия производственной деятельности работников умственного труда. Их труд стал более интенсивным, напряженным, требующим значительных затрат умственной, эмоциональной и физической энергии. Это потребовало комплексного решения проблем эргономики, гигиены и организации труда, регламентации режимов труда и отдыха [27].

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

Обращается внимание на необходимость широкого применения прогрессивных форм научной организации труда, сведения к минимуму ручного, малоквалифицированного труда, создания обстановки, исключающей профессиональные заболевания и производственный травматизм.

Данный раздел дипломного проекта посвящен рассмотрению следующих вопросов:

- организация рабочего места пользователя;

- определение оптимальных условий труда пользователя.

3.1 Описание рабочего места пользователя

Рабочее место - это часть пространства, в котором инженер осуществляет трудовую деятельность, и проводит большую часть рабочего времени. Рабочее место, хорошо приспособленное к трудовой деятельности инженера, правильно и целесообразно организованное, в отношении пространства, формы, размера обеспечивает ему удобное положение при работе и высокую производительность труда при наименьшем физическом и психическом напряжении.

При правильной организации рабочего места производительность труда инженера возрастает с 8 до 20 процентов.

Конструкция рабочего места и взаимное расположение всех его элементов должно соответствовать антропометрическим, физическим и психологическим требованиям. Большое значение имеет также характер работы. В частности, при организации рабочего места пользователя должны быть соблюдены следующие основные условия [28]:

1. оптимальное размещение оборудования, входящего в состав рабочего места;

2. достаточное рабочее пространство, позволяющее осуществлять все необходимые движения и перемещения;

3. необходимо естественное и искусственное освещение для выполнения поставленных задач;

4. уровень акустического шума не должен превышать допустимого значения.

Главными элементами рабочего места программиста являются письменный стол и кресло. Основным рабочим положением является положение сидя.

Рабочая поза сидя вызывает минимальное утомление пользователя.

Рациональная планировка рабочего места предусматривает четкий порядок и постоянство размещения предметов, средств труда и документации. То, что требуется для выполнения работ чаще, расположено в зоне легкой досягаемости рабочего пространства.

Моторное поле - пространство рабочего места, в котором могут осуществляться двигательные действия человека.

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

Оптимальная зона - часть моторного поля рабочего места, ограниченного дугами, описываемыми предплечьями при движении в локтевых суставах с опорой в точке локтя и с относительно неподвижным плечом [29].

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

а - зона максимальной досягаемости;

б - зона досягаемости пальцев при вытянутой руке;

в - зона легкой досягаемости ладони;

г - оптимальное пространство для грубой ручной работы;

д - оптимальное пространство для тонкой ручной работы.

Рассмотрим оптимальное размещение предметов труда и документации в зонах досягаемости рук:

1. Дисплей размещается в зоне а (в центре);

2. Клавиатура - в зоне г/д;

3. Системный блок размещается в зоне б (слева);

4. Принтер находится в зоне а (справа);

5. Документация

1) в зоне легкой досягаемости ладони - в (слева) - литература и документация, необходимая при работе;

2) в выдвижных ящиках стола - литература, неиспользуемая постоянно. [30]

При проектировании письменного стола следует учитывать следующее:

1. высота стола должна быть выбрана с учетом возможности сидеть свободно, в удобной позе, при необходимости опираясь на подлокотники;

2. нижняя часть стола должна быть сконструирована так, чтобы программист мог удобно сидеть, не был вынужден поджимать ноги;

3. поверхность стола должна обладать свойствами, исключающими появление бликов в поле зрения пользователя;

4. конструкция стола должна предусматривать наличие выдвижных ящиков (не менее 3 для хранения документации, листингов, канцелярских принадлежностей, личных вещей).

Параметры рабочего места выбираются в соответствии с антропометрическими характеристиками. При использовании этих данных в расчетах следует исходить из максимальных антропометрических характеристик (М+2).

При работе в положении сидя рекомендуются следующие параметры рабочего пространства:

1. ширина не менее 700 мм;

2. глубина не менее 400 мм;

3. высота рабочей поверхности стола над полом 700-750 мм.

Оптимальными размерами стола являются:

1. высота 710 мм;

2. длина стола 1300 мм;

3. ширина стола 650 мм.

Поверхность для письма должна иметь не менее 40 мм в глубину и не менее 600 мм в ширину. [30]

Под рабочей поверхностью должно быть предусмотрено пространство для ног:

1. высота не менее 600 мм;

2. ширина не менее 500 мм;

3. глубина не менее 400 мм.

Важным элементом рабочего места программиста является кресло. При проектировании кресла исходят из того, что при любом рабочем положении пользователя его поза должна быть физиологически правильно обоснованной, т.е. положение частей тела должно быть оптимальным. Для удовлетворения требований физиологии, вытекающих из анализа положения тела человека в положении сидя, конструкция рабочего сидения должна удовлетворять следующим основным требованиям:

1. допускать возможность изменения положения тела, т.е. обеспечивать свободное перемещение корпуса и конечностей тела друг относительно друга;

2. допускать регулирование высоты в зависимости от роста работающего человека ( в пределах от 400 до 550 мм );

3. иметь слегка вогнутую поверхность,

4. иметь небольшой наклон назад.

5. Исходя из вышесказанного, приведем параметры стола пользователя:

6. высота стола 710 мм;

7. длина стола 1300 мм;

8. ширина стола 650 мм;

9. глубина стола 400 мм.

10. Поверхность для письма:

11. в глубину 40 мм;

12. в ширину 600 мм.

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

Создание благоприятных условий труда и правильное эстетическое оформление рабочих мест на производстве имеет большое значение как для облегчения труда, так и для повышения его привлекательности, положительно влияющей на производительность труда. Окраска помещений и мебели должна способствовать созданию благоприятных условий для зрительного восприятия, хорошего настроения.

В служебных помещениях, в которых выполняется однообразная умственная работа, требующая значительного нервного напряжения и большого сосредоточения, окраска должна быть спокойных тонов - малонасыщенные оттенки холодного зеленого или голубого цветов [31].

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

3.2 Освещенность рабочего места

Рациональное освещение рабочего места является одним из важнейших факторов, влияющих на эффективность трудовой деятельности человека, предупреждающих травматизм и профессиональные заболевания. Правильно организованное освещение создает благоприятные условия труда, повышает работоспособность и производительность труда.

Освещение на рабочем месте пользователя должно быть таким, чтобы работник мог без напряжения зрения выполнять свою работу. Утомляемость органов зрения зависит от ряда причин:

1. недостаточность освещенности;

2. чрезмерная освещенность;

3. неправильное направление света.

Недостаточность освещения приводит к напряжению зрения, ослабляет внимание, приводит к наступлению преждевременной утомленности. Чрезмерно яркое освещение вызывает ослепление, раздражение и резь в глазах. Неправильное направление света на рабочем месте может создавать резкие тени, блики, дезориентировать работающего. Все эти причины могут привести к несчастному случаю или профзаболеваниям, поэтому столь важен правильный расчет освещенности.

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

Исходя из этого, рассчитаем параметры искусственного освещения.

Искусственное освещение выполняется посредством электрических источников света двух видов: ламп накаливания и люминесцентных ламп.

Будем использовать люминесцентные лампы, которые по сравнению с лампами накаливания имеют существенные преимущества:

1. по спектральному составу света они близки к дневному, естественному освещению;

2. обладают более высоким КПД (в 1.5-2 раза выше, чем КПД ламп накаливания);

3. обладают повышенной светоотдачей (в 3-4 раза выше, чем у ламп накаливания);

4. более длительный срок службы.

Расчет освещения производится для комнаты площадью 36 м2 , ширина которой 4.9 м, высота - 4.2 м. Воспользуемся методом светового потока.

Для определения количества светильников определим световой поток, падающий на поверхность по формуле:

, где

F - рассчитываемый световой поток, Лм;

Е - нормированная минимальная освещенность, Лк (определяется по таблице). Работу программиста, в соответствии с этой таблицей, можно отнести к разряду точных работ, следовательно, минимальная освещенность будет Е = 300 Лк при газоразрядных лампах;

S - площадь освещаемого помещения ( в нашем случае S = 36 м2 );

Z - отношение средней освещенности к минимальной (обычно принимается равным 1.1-1.2 , пусть Z = 1.1);

К - коэффициент запаса, учитывающий уменьшение светового потока лампы в результате загрязнения светильников в процессе эксплуатации (его значение определяется по таблице коэффициентов запаса для различных помещений и в нашем случае К = 1.5);

n - коэффициент использования, (выражается отношением светового потока, падающего на расчетную поверхность, к суммарному потоку всех ламп и исчисляется в долях единицы; зависит от характеристик светильника, размеров помещения, окраски стен и потолка, характеризуемых коэффициентами отражения от стен (Рс) и потолка (Рп)), значение коэффициентов Рс и Рп определим по таблице зависимостей коэффициентов отражения от характера поверхности: Рс=30%, Рп=50%. Значение n определим по таблице коэффициентов использования различных светильников. Для этого вычислим индекс помещения по формуле:

, где

S - площадь помещения, S = 36 м2;

h - расчетная высота подвеса, h = 3.39 м;

A - ширина помещения, А = 4.9 м;

В - длина помещения, В = 7.35 м.

Подставив значения получим:

Зная индекс помещения I, Рс и Рп, по таблице находим n = 0.28

Подставим все значения в формулу для определения светового

потока F:

Лм

Для освещения выбираем люминесцентные лампы типа ЛБ40-1, световой поток которых F = 4320 Лк.

Рассчитаем необходимое количество ламп по формуле: , где

N - определяемое число ламп;

F - световой поток, F = 63642,857 Лм;

Fл- световой поток лампы, Fл = 4320 Лм.

шт.

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

Параметры микроклимата на рабочем месте

Параметры микроклимата могут меняться в широких пределах, в то время как необходимым условием жизнедеятельности человека является поддержание постоянства температуры тела благодаря свойству терморегуляции, т.е. способности организма регулировать отдачу тепла в окружающую среду [32].

Основной принцип нормирования микроклимата - создание оптимальных условий для теплообмена тела человека с окружающей средой.

В санитарных нормах СН-245/71 установлены величины параметров микроклимата, создающие комфортные условия.

Эти нормы устанавливаются в зависимости от времени года, характера трудового процесса и характера производственного помещения (значительные или незначительные тепловыделения).

Для рабочих помещений с избыточным тепловыделением до 20 ккал/м3 допустимые и оптимальные значения параметров микроклимата приведены в таблице 12:

Таблица 12.

Параметры микроклимата

Время года	Зона	Температура воздуха, 0 C	Относительная влажность, %	Скорость движения воздуха, м/с
Холодный период	Оптимальная	18 - 21	60 - 40	< 0.2
Переходный период	Допустимая	17 - 21	< 75	< 0.3
Теплый пе- риод года (t > 100 C)	Оптимальная	20 - 25	60 - 40	< 0.3
	Допустимая	< 28 в 13 часов самого жаркого мес.	< 75	< 0.5

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

В связи с этим рекомендуется на территории факультета организовывать зеленую зону со скамейками для отдыха и водоемом (бассейны, фонтаны). Технические средства включают вентиляцию, кондиционирование воздуха, отопительную систему.

3.3 Нормирование шума

Установлено, что шум ухудшает условия труда, оказывая вредное воздействие на организм человека. При длительном воздействии шума на человека происходят нежелательные явления: снижается острота зрения, слуха, повышается кровяное давление, понижается внимание.

Сильный продолжительный шум может стать причиной функциональных изменений сердечнососудистой и нервной систем.

Характеристикой постоянного шума на рабочих местах являются среднеквадратичные уровни давлений в октавных полосах частот со среднегеометрическими стандартными частотами: 63, 125, 250, 500, 1000, 2000, 4000 и 8000 Гц.

Для помещений конструкторских бюро, расчетчиков и программистов уровни шума не должны превышать соответственно: 71, 61, 54, 49, 45, 42, 40, 38 дБ. Эта совокупность восьми нормативных уровней звукового давления называется предельным спектром [32].

Методы защиты от шума

Строительно-акустические методы защиты от шума предусмотрены строительными нормами и правилами (СНиП-II-12-77). это:

1. звукоизоляция ограждающих конструкции, уплотнение по периметру притворов окон и дверей;

2. звукопоглощающие конструкции и экраны;

3. глушители шума, звукопоглощающие облицовки.

На рабочем месте пользователя источниками шума, как правило, являются технические средства, как то - компьютер, принтер, вентиляционное оборудование, а также внешний шум.

Они издают довольно незначительный шум, поэтому в помещении достаточно использовать звукопоглощение. Уменьшение шума, проникающего в помещение извне, достигается уплотнением по периметру притворов окон и дверей.

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

Наиболее выраженными звукопоглощающими свойствами обладают волокнисто-пористые материалы: фибролитовые плиты, стекловолокно, минеральная вата, полиуретановый поропласт, пористый поливинилхлорид и др. К звукопоглощающим материалам относятся лишь те, коэффициент звукопоглощения которых не ниже 0.2.

Звукопоглощающие облицовки из указанных материалов (например, маты из супертонкого стекловолокна с оболочкой из стеклоткани нужно разместить на потолке и верхних частях стен). Максимальное звукопоглощение будет достигнуто при облицовке не менее 60% общей площади ограждающих поверхностей помещения.

Вентиляция

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

На производстве рекомендуется создавать динамический климат с определенными перепадами показателей.

Температура воздуха у поверхности пола и на уровне головы не должна отличаться более, чем на 5 градусов. В производственных помещениях помимо естественной вентиляции предусматривают приточно-вытяжную вентиляцию.

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

Выводы

В этой части дипломной работы были изложены требования к рабочему месту программиста (пользователя). Созданные условия должны обеспечивать комфортную работу. На основании изученной литературы по данной проблеме, были указаны оптимальные размеры рабочего стола и кресла, рабочей поверхности, а также проведен выбор системы и расчет оптимального освещения производственного помещения, а также расчет информационной нагрузки.

Соблюдение условий, определяющих оптимальную организацию рабочего места пользователя, позволит сохранить хорошую работоспособность в течение всего рабочего дня, повысит, как в количественном, так и в качественном отношениях производительность труда пользователя.

Заключение

В большинстве теоретических задачах речь идет о постановках и методах решения задач, не содержащих неопределенностей. Однако, как правило, большинство реальных инженерных задач содержит в том или ином виде неопределенность.

Можно даже утверждать, что решение задач с учетом разного вида неопределенностей является общим случаем, а принятие решений без их учета - частным. Однако, из-за концептуальных и методических трудностей в настоящее время не существует единого методологического подхода к решению таких задач.

Тем не менее, накоплено достаточно большое число методов формализации постановки и принятия решений с учетом неопределенностей. При использовании этих методов следует иметь в виду, что все они носят рекомендательный характер и выбор окончательного решения всегда остается за человеком (ЛПР).

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

Уже в момент ее зарождения, которым считают публикацию в 1944 г. монографии Дж. Неймана и О.Моргенштерна “Теория игр и экономическое поведение”, многие предсказали революцию в экономических науках благодаря использованию нового подхода.

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

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

Первые работы по теории игр отличались упрощенностью предположений и высокой степенью формальной абстракции, что делало их малопригодными для практического использования. За последние 10 - 15 лет положение резко изменилось.

Бурный прогресс в промышленной экономике показал плодотворность методов игр в прикладной сфере.

В теории принятия решений используются "разумные" процедуры выбора наилучшей из нескольких возможных альтернатив.

Насколько правильным будет выбор, зависит от качества данных, используемых при описании ситуации, в которой принимается решение. С этой точки зрения процесс принятия решений может принадлежать к одному из трех возможных условий.

1. Принятие решений в условиях определенности, когда данные известны точно.

2. Принятие решений в условиях риска, когда данные можно описать с помощью вероятностных распределений.

3. Принятие решений в условиях неопределенности, когда данным нельзя приписать относительные веса (весовые коэффициенты), которые представляли бы степень их значимости в процессе принятия решений.

По существу, в условиях определенности данные надежно определены, в условиях неопределенности они не определены. Принятие решений в условиях риска, следовательно, представляет "промежуточный" случай.

В дипломном проекте разработана программа автоматизации расчётов методами принятия решений в условиях частичной неопределенности.

Список использованной литературы

1. Мешковой Н.П., Закиров Р.Ш. Теория игр, конспект лекций. Челябинск, ЧПИ, 19742.

2. Р.Л.Кини Теория принятия решений. - В кн.Исследование операций. М.:Мир, 1981 г.

3. Карлин С. Математические методы в теории игр, программировании и экономике М.:Мир, 1964

4. Кофман А., Фор Р. Займемся исследованием операций. М:Мир, 1966

5. Вентцель Е.С. Исследование операция. - М.: Советское радио, 1972.

6. Воробьев Н.Н. Теория игр для экономистов-кибернетиков. - М.: Наука, 1985.

7. Горелик В.А., Кононенко А.Ф. Теоретико-игровые модели принятия решений в эколого-экономических системах. - М.: Радио и связь, 1982

8. Давыдов Э.Г. Исследование операций. - М.: Высшая школа, 1990.

9. Лапшин К.А., Светлов Н.М. Прогграммный комплекс «Линейная оптимизация» - методические указания для студентов экономического факультета. - М.: МСХА, 1994.

10. Лесик, А. И., Чистяков, Ю. Е. Теоретико-игровые модели взаимодействия экономических субъектов производственной системы. - М. : ВЦ РАН, 1994.

11. Мулен Э. Теория игр с примерами из математической экономики. - М.: Мир, 1985.

12. Петросян Л.А., Зенкевич Н.А., Семина Е.А. Теория игр. М.: Высшая школа, 1998.

13. Платов В.Я. Деловые игры: разработка, организация, проведение. - М.: Профиздат, 1991.

14. Сысоев, В. В. Теоретико-игровые модели принятия решений многоцелевого управления в задачах выбора и распределения ресурсов / Воронеж : Воронеж. гос. технол. акад., 2000.

15. Экономико-математические методы и прикладное моделирование / В.В. Федосеев. - М.: ЮНИТИ, 2002. - 391 с.

16. Математическое моделирование макроэкономических процессов / А.Н. Котов. - Л.: ЛГУ, 1980

17. Основы экономико-математического моделирования / Ю.Г. Семенов.1976

18. Экономико-математические методы / Л.Л. Терехов.- М.: Статистика-1972

19. Теория принятия решений. Учебное пособие / А.И.Орлов.- М.: Издательство «Март», 2004. -

20. Орлов А.И. Экспертные оценки // Заводская лаборатория. 1996. Т.62. № 1. С.54-60.

21. П.А. Воробьев, М.В. Сура Принятие решений - на пути от теории к практике //2005

22. Архангельский А.Я. Delphi 7. Справочное пособие. - М: ЗАО Издательство БИНОМ», 2008.

23. Архангельский А.Я. Программирование в Delphi 7. - М.: ЗАО «Издательство БИНОМ», 2008.

24. Гофман В.А., Хомоненко А.В. Delphi 7.- С-П.:БХВ-Петербург. 2007.

25. Дейт К. Объектно-ориентированное программирование.- М.: Hаука. 2002.

26. Шумаков П. В. Delphi 6.0 и создание баз данных.- М.: Бином. 2001.

27. СНиП II - 4 - 79. Естественное и искусственное освещение. Нормы проектирования.-М.: Стройиздат, 1980.

28. Безопасность жизнедеятельности: безопасность технологических процессов и производств. Кукин П.П., В.Л. Лапин М: высшая школа, 2004 г.

29. Основы безопасности жизнедеятельности. Хван Т.А., Хван П.А. Ростов - на - Дону: «Феникс», 2000 г.

30. Безопасность жизнедеятельности. Русак О.Н., Малаян К.Р., Занько Н.Г. СПб, 2002 г.

31. Безопасность жизнедеятельности, Приходько Н.Г., Алматы, 2004 г.,

32. Охрана труда в торговле, общественном питании, пищевых производствах в малом бизнесе и быту. Фатыхов Д.Ф., Белехов А.Н. М: Академия, 2003 г.,

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