Использование макросов

Федеральное государственное бюджетное образовательное учреждение

высшего профессионального образования

«Саратовский государственный технический университет

имени Гагарина Ю.А.»

 

 

 

 

Самостоятельная работа

по дисциплине «Моделирование перевозочных процессов»

на тему: «Использование макросов»

Вариант 15

 

 

 

 

 

Выполнил:  студент гр. ОПТ – 41

Чирков И.Е.

Проверила: Муравьева Н.А.

 

 

 

 

 

 

 

 

 

Саратов

2013

Задача 1.

Рассчитать потребное количество автобусов трех марок для четырех автобусных маршрутов, если коэффициент использования вместимости γвм=0,85, коэффициент использования сменности  =3.

Показатели маршрутов:

Название показателя	Условное обозначение	Название маршрута
		Маршрут 1	Маршрут 2	Маршрут 3	Маршрут 4
Среднее количество пассажирова за час	Qчас	700	890	750	1050
Время рейса	tр	0,45	0,6	0,85	1
Коэффициент неравномерности	kн	1,4	1,6	1,8	2

 

Название показателя	Марка автобуса
	ПАЗ	Газель	ЛиАЗ
Вместимость	55	13	65

 

Аналитическое решение:

Потребное число автобусов на маршруте

A =

Часовая производительность одного автобуса на маршруте

Uчас = 

 

Решение задачи.

1. Занесем данные в рабочий лист.
2. Занесем дополнительные данные.

 

3. Запустим редактор Visual Basic For Application  (Комбинацией клавиш Alt + F11).

 

4. В редакторе выберем команду Insert – Module.

 

5. В появившемся окне редактора напечатаем текст функции для расчета потребности в автобусах.

 

 

 

6. Закроем редактор Visual Basic и вернемся в Excel. В ячейку B24 занесем формулу =ПотребностьВАвтобусах(D$5;D$7;D$6;$B22;$D$10;$D$11).

 

 

 

 

 

 

 

Задача 2.

Найти грузооборот Р, если Q=100 т, средняя длина ездки с грузом  lег=25 км, γст =0,5; γд =0,4. Выполнить расчеты для γст =0,5;0,6;0,9;0,8  и  γд=0,4;0,5; 0,7;0,8 .

 

Аналитическое решение:

Для решения задачи используем  формулы:

           .     

                    Решение в Excel

1. Заполняем исходные данные на рабочем листе Excel. Затем, в ячейку C8 заносим формулу  =(C6*$C$7*($C$3/(C5*$C$7)*$C$4)) и распространяем в диапазоне C8:F8.
2. Таким образом мы посчитаем грузооборот P.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Задача 3.

Вычислить время оборота t об  на городском автобусном  маршруте,  если Lм=30км, nпр=11, tпо=20с, tко=6 мин, υт=22 км/ч. Рассчитать дополнительно t об , если υт=10 км/ч и υт=30 км/ч 

Аналитическое решение:

Для решения задачи используем формулу

  .

Решение в Excel

1. Занесем исходные данные на рабочий лист.

 

 

2. Занесем в ячейку  D8  формулу = 2*($D$2/D6+$D$3*$D$4+$D$5*60)/360, и распространим ее в диапазоне E8:F8. Получим искомое время оборота.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Задача 5.

Найти объем выполненной работы, если P = 420 ткм, средняя длина ездки грузом  lег = 18 км, γст = 0,9; γд =0,6. Выполнить расчеты при Р = 120, 220, 320, 520, 620  ткм   и lег = 8, 9, 10, 19; 20  км.

 

Аналитическое решение:

 

Для решения задачи используются формулы: 

                 

Решение в Excel

1. Заполняем таблицы с исходными данными на рабочем листе Excel. Затем в ячейку C8  заносим формулу =$C$5*(C3/($C$6*C4)) и распространяем в диапазоне C8:H8, в результате мы рассчитали Q, и нашли объем выполненной работы.

 

 

 

 

 

 

 

 

Задача 6.

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

 

Тарифы                                 Таблица 1    

Марка автобуса	Расстояние перевозки
	до 10	от 10 до 30	больше 30
ПАЗ	0,6	0,5	0,4
ГАЗель	0,7	0,6	0,5
Икарус	0,8	0,7	0,6

Определить стоимость билета для следующих пунктов и марок автобусов.

 

Таблица 2

Населенный пункт	Расстояние	Автобус
Петровка	20	ПАЗ
Федоровка	30	Икарус
Чардым	45	ГаЗель
Медведково	9	ПАЗ

 

Решение в Excel

1. Заполняем таблицы с исходными данными на рабочем листе Excel. Затем в ячейку B9 заносим формулу =ЕСЛИ(B8=$F$3;$C$4;ЕСЛИ(B8=$F$4;$C$4;ЕСЛИ(B8=$F$5;$D$4;ЕСЛИ(B8=$F$6;$B$4;"ошибка")))) и распространяем ее в диапазоне B9:E9, таким образом программа подберет нужный тариф по пунктам для автомобиля ПАЗ.
2. В ячейку B10 заносим формулу =ЕСЛИ(B8=$F$3;$C$5;ЕСЛИ(B8=$F$4;$C$5;ЕСЛИ(B8=$F$5;$D$5;ЕСЛИ(B8=$F$6;$B$5;"ошибка")))) и распространяем ее в диапазоне B10:E10, таким образом программа подберет нужный тариф по пунктам для автомобиля ГАЗель.
3. В ячейку B11заносим формулу =ЕСЛИ(B8=$F$3;$C$6;ЕСЛИ(B8=$F$4;$C$6;ЕСЛИ(B8=$F$5;$D$6;ЕСЛИ(B8=$F$6;$B$6;"ошибка")))) и распространяем ее в диапазоне B11:E11, таким образом программа подберет нужный тариф по пунктам для автомобиля Икарус.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Задача 7.

Рассчитать коэффициент использования грузоподъемности для каждой  пары значений qф=20 ;14; 16; 17  и qв= 30; 40; 20.

 

Аналитическое решение:

Для решения задачи используется  формула: 

γ= qф /qв.

 

Решение в Excel:

1. Заполняем таблицы с исходными данными на рабочем листе Excel.

 

2. Затем в ячейку C5 заносим формулу  и распространяем в диапазоне C5:F5, тем самым находим коэффициент использования грузоподъемности.

 

 

 

 

 

 

 

 

 

 

 

Задача 8.

Коэффициент использования пробега автомобиля за день 1= 0,8, за день 2 = 0,9, за день 3= 0,68. Пробег автомобиля без груза в день 1=40 км, за день 2=38 км, за день 3=43 км. Нулевой пробег за день1= 10 км, за день2= 8 км,

за день3= 12 км. Рассчитать пробег с грузом.

 

Аналитическое решение:

 

Для решения задачи используется формула

 

 

Решение Excel:

1. Заполняем таблицы с исходными данными на рабочем листе Excel. Затем в ячейку D6 заносим формулу =D2*(D3+D4) и распространяем в диапазоне D6:F6, тем самым находим – пробег с грузом.

 

 

 

 

 

 

 

Задача 9.

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

 

Название показателя	Предприятие
	1	2	3
Списочное число автобусов Асс	19	22	26
Дни календарные Дк	30	30	30
Коэффициент выпуска автобусов на линию aв	0,85	0,9	0,91
Суточный пробег одного автобуса Lсут, км	544	565	589

 

Аналитическое решение:

Для решения задачи используется формула

 

 

Расчеты требуется выполнить для каждого АТП.

 

Решение в Excel

 

1. Занесем исходную таблицу на рабочий лист.

 

2. Занесем в ячейку  D8  формулу =D3*D4*D5*D6, распространим в диапазоне E8:F8.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Задача 10. 

Суточный пробег с пассажирами Lсут =300 км, средняя длина поездки пассажира lср=3 км ,γвм=0,75. Определить суточную производительность Uq для 2 марок автобусов (Газель- qвм=13, ПАЗ- qвм=35). Выполнить расчеты для  lср=2;3;4,5;6 км.

 

Аналитическое решение:

Для решения задачи используется формула

.                 

Решение в Excel:

1. Заполняем исходные данные на рабочем листе Excel. Затем, в ячейку C9 заносим формулу =($C$7*$C$6*$C$4)/C5 и распространяем в диапазоне C9:G9.
2. Таким образом мы посчитали суточную производительность для автомобиля Газель.
3. В ячейку C10 заносим формулу =($C$8*$C$6*$C$4)/C5 и распространяем в диапазоне C10:G10.

 

4. Так мы посчитали суточную производительность для автомобиля ПАЗ.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Задача 11

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

Название показателя	Предприятие
	1	2	3
Списочное число автобусов Асс	34	45	32
Дни календарные Дк	30	30	30
Коэффициент выпуска автобусов на линию aв	0,95	0,88	0,90
Суточный пробег одного автобуса Lсут, км	533	499	601