Фрагмент програми і результати обчислень на еом

unit Unit1;

interface

uses

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

Dialogs Grids,StdCtrls,math, Menus, Buttons, ExtCtrls, OleServer, WordXP;

……………………………………………………………………………….

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit2, Unit3;

{$R *.dfm}

......................................................................................................

procedure TForm1.BitBtn6Click(Sender: TObject);

var i,j:integer;

p,p1:real;

sr,sr1,sr2:real;

begin

for i:=1 to 10 do

for j:=2 to 8 do

begin

p := (1/StrToFloat(StringGrid1.Cells[8, 1]))*(ln(((StrToFloat(StringGrid1.Cells[2, i])*StrToFloat(StringGrid1.Cells[4, 1])*StrToFloat(StringGrid1.Cells[6, 1]))+

(StrToFloat(StringGrid1.Cells[3, i])*StrToFloat(StringGrid1.Cells[5, 1])*StrToFloat(StringGrid1.Cells[7, 1])))/

((StrToFloat(StringGrid1.Cells[3, i])*StrToFloat(StringGrid1.Cells[5, 1])*StrToFloat(StringGrid1.Cells[7, 1]))-

(StrToFloat(StringGrid1.Cells[2, i])*StrToFloat(StringGrid1.Cells[4, 1])*StrToFloat(StringGrid1.Cells[6, 1])))));

StringGrid1.Cells[9, i] :=FloatToStrF(p,ffFixed,5,5);

end;

for i:=11 to 20 do

for j:=2 to 8 do

begin

p1 := (1/StrToFloat(StringGrid1.Cells[8, 11]))*(ln(((StrToFloat(StringGrid1.Cells[2, i])*StrToFloat(StringGrid1.Cells[4, 11])*StrToFloat(StringGrid1.Cells[6, 11]))+

(StrToFloat(StringGrid1.Cells[3, i])*StrToFloat(StringGrid1.Cells[5, 11])*StrToFloat(StringGrid1.Cells[7, 11])))/

((StrToFloat(StringGrid1.Cells[3, i])*StrToFloat(StringGrid1.Cells[5, 11])*StrToFloat(StringGrid1.Cells[7, 11]))-

(StrToFloat(StringGrid1.Cells[2, i])*StrToFloat(StringGrid1.Cells[4, 11])*StrToFloat(StringGrid1.Cells[6, 11])))));

StringGrid1.Cells[9, i] :=FloatToStrF(p1,ffFixed,5,5);

end;

...............................................................................

Вікно введення даних

Вікно обробки результатів вимірювань

Список рекомендованої літератури

1. Транспорт на гірничих підприємствах: Підручник для вузів. – 3-є вид. / Заг. редагування доповнень та змін проф. М.Я. Біліченка – Дніпропетровськ: Національний гірничий університет, 2005. – 636 с.

2. В.О. Салов. Основи експлуатаційних розрахунків транспорту гірничих підприємств: Навчальний посібник. Дніпропетровськ: Національний гірничий університет, 2005. – 199 с.

3. Основи теорії та розрахунки засобів транспортування вантажів шахт: Навч. посібник. – 2-е вид. / М.Я.Біліченко, О.В.Денищенко. – Д.: НГУ, 2008. – 103 с.

4. Подземный транспорт шахт и рудников: Справочник / Под общ. ред. Г.Я. Пейсаховича, И.П. Ремизова. – М.: Недра, 1985. – 565 с.

5. Основные положения по проектированию подземного транспорта для новых и действующих угольных шахт. – М.: ИГД им. Скочинского, 1985. – 356 с.

6. Розрахунок шахтного локомотивного транспорту: Навч. посіб. / О.О. Ренгевич, О.М. Коптовець, П.А. Дьячков та ін. – Д.: Національний гірничий університет, 2007. – 83 с.

7. Правила безпеки у вугільних шахтах НПАОП 10.0-1.01-10. Затв. Держнаглядохоронпраці України– Київ, 2010. – 242 с.

8. Збірник інструкцій до правил безпеки у вугільних шахтах. Том 1. – К.: Основа, 2010. – 425 с.

9. Збірник інструкцій до правил безпеки у вугільних шахтах. Том 2. – К.: Основа, 2010. – 399 с.

10. Григорьев В.Н., Дьяков В.А., Пухов Ю.С. Транспортные машины для подземных разработок. – М.: Недра, 1983. – 421 с.

11. Евневич О.В. Транспортные машины и комплексы. – Изд. 2-е, перераб. и доп. – М.: Недра, 1975. – 415 с.

12. Стандарт вищого навчального закладу. Кваліфікаційні роботи випускників. Загальні вимоги до дипломних проектів і дипломних робіт / Упорядн.: В.О. Салов, О.М. Кузьменко, В.І. Прокопенко. – Д.: НГА України, 2002. – 52 с.

13. Оркатский П.П. Теоретические основы информационно-измерительной техники. – Киев : Вища школа, 1976, – 432 с.

14. Сена Л.А, Единицы физических величин и их размерности – М. Наука, 1977. – 336 с.

15. Туригин А.М. Электрические измерения неэлектрических величин. – Л.: Энергия, 1976. – 577 с.

16. Штремель и. А. Инженер в лаборатории. - М.; Металлургия, 1983. – 128 с.

Упорядники:

Євгеній Анатолійович Коровяка,

Вікторія Вікторівна Яворська,

Валерій Олександрович Расцвєтаєв

МЕТОДИЧНІ ВКАЗІВКИ ДО ВИКОНАННЯ

ЛАБОРАТОРНИХ РОБІТ З ДИСЦИПЛІНИ

«ТРАНСПОРТНІ СИСТЕМИ ГІРНИЧИХ ПІДПРИЄМСТВ»

ДЛЯ СТУДЕНТІВ НАПРЯМУ ПІДГОТОВКИ 050301 ГІРНИЦТВО

Редактор ___________________

Підписано до друку __________. Формат 30х42/4.

Папір офсетний. Ризографія. Ум. друк. арк. 1,2.

Обл.-вид. арк. 1,2.

Тираж 150 прим. Зам. № ______.

НГУ