Стоимость перевозки единицы продукции

Предприятия	Пункты потребления

	3,2		2,35		3,65
		2,85	2,5	3,9	3,55
	3,75	2,5	2,4	3,5	3,4
			2,1	4,1	3,4

Решение

1. Проверка сбалансированности модели задачи – модель является сбалансированной, т.к. суммарный объем производимой продукции в день равен суммарному объему потребности в ней:

235+175+185+175=125+160+60+250+175.

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

2. Построение математической модели – неизвестными в этой задаче являются объемы перевозок. Пусть x_ij – объем перевозок с i–го предприятия в j–й пункт потребления. Суммарные транспортные расходы – это функционал качества (критерий цели):

где c_ij – стоимость перевозки единицы продукции с i-го предприятия в j-й пункт потребления.

Неизвестные в этой задаче должны удовлетворять следующим ограничениям:

§ объемы перевозок не могут быть отрицательными.

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

Итак, имеем следующую задачу:

§ найти минимум функционала:

§ при ограничениях:

где a_i – объем производства на i–м предприятии, b_j - спрос в j–м пункте потребления.

3. Решение задачи с помощью окна Поиск решения:

Подготовку рабочего листа для задачи осуществляем в соответствии с рис. 5.1., формулы для расчета приведены в таблице 5.2.

Рис. 5.1. Исходные данные для решения транспортной задачи

Таблица 5.2

Формулы расчетов

Описание	Ячейка	Формула
Ограничения_1	G11	=СУММ(B11:F11)
	G12	=СУММ(B12:F12)
	G13	=СУММ(B13:F13)
	G14	=СУММ(B14:F14)
Ограничения_2	B15	=СУММ(B11:B14)
	C15	=СУММ(C11:C14)
	D15	=СУММ(D11:D14)
	E15	=СУММ(E11:E14)
	F15	=СУММ(F11:F14)
	B19	=СУММПРОИЗВ(B5:F8.B11:F14)

Рис. 5.2. Ввод данных в окно Поиск решения для транспортной задачи

Ввод данных в окно Поиск решения производим в соответствии с рис. 5.2.. полученное оптимальное решение представлено на рис. 5.3.

Рис. 5.3. Оптимальное решение для транспортной задачи

Лабораторная работа №6.

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

ЗАДАНИЕ

1. Создайте макрос в вашей рабочей книге на языке Visual Basic.

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

3. Назначьте макросу пункт меню Сервис.

4. Проверьте работоспособность макроса.

ВАРИАНТЫ ЗАДАНИЯ

Вариант №1.Создать макрос, который выделенные значения приводит к числовому формату с тремя знаками после запятой. Значения выводятся красным цветом.

Вариант №2.Создать макрос, который выделенные значения выравнивает по центру, делает их зелёными. Размер шрифта – 18, курсив, полужирный.

Вариант №3.Создать макрос, который в выделенной области ширину столбца делает оптимальной.

Вариант №4.Создать макрос, который в текущем листе ширину столбца делает равной 15.

Вариант №5.Создать макрос, предназначенный для копирования выделенной области на Лист3 и защиты Листа3 от изменения.

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

Вариант №7.Создать макрос, который копирует выделенную область на Лист2. На Лист2 область должна находится, начиная с ячейки B12.

Вариант №8.Создать макрос, который все данные на листе выводит красным цветом на светло-голубом фоне и защищает лист от изменения.

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

Вариант №10.Создать макрос, который, начиная с текущей позиции, вводит геометрическую прогрессию с шагом 16, предельное значение геометрической прогрессии 12400, цвет - красный.

Вариант №11.Создать макрос, который, начиная с текущей позиции, вводит геометрическую прогрессию с шагом 6, предельное значение геометрической прогрессии 1240 цвет - синий, шрифт полужирный, курсив.

Вариант №12.Создать макрос, который, начиная с текущей позиции, вводит названия двенадцати месяцев зеленым цветом, размер шрифта – 12.

Вариант №13.Создать макрос, который, начиная с текущей позиции, вводит арифметическую прогрессию с шагом 37, предельное значение прогрессии 312, и защищает лист от копирования.

Вариант №14.Создать макрос, который данные в выделенной области выводит красным цветом (курсив, полужирный) на светло-голубом фоне.

Вариант №15.Создать макрос, который данные в выделенной области приводит к денежному формату. шрифт – Arial, полужирный, размер – 11, символы светло-зелённого цвета.

Вариант №16.Создать макрос, который данные в выделенной области приводит к следующему типу: шрифт – Courier, курсив, полужирный. размер – 18, цвет – розовый, фон – голубой.

Вариант №17.Создать макрос, который данные в выделенной области приводит к следующему типу: выравнивание по правой границе, размер шрифта – 15. цвет – зелёный, фон – желтый.

Вариант №18.Создать макрос, который, начиная с текущей позиции, вводит названия двенадцати месяцев зелёным цветом.

Вариант №19.Создать макрос, который данные в выделенной области приводит к следующему типу: выравнивание по правой границе, размер шрифта – 15, цвет – зелёный, фон – желтый, вокруг выделенной области – граница.

Вариант №20.Создать макрос, который включает панели инструментов Visual Basicи Диаграммаи выключает панель Форматирование.

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

Вариант №22.Создать макрос, который, начиная с текущей позиции, вводит геометрическую прогрессию с шагом 9, предельное значение геометрической прогрессии 100000. Значения вводятся зеленным цветом, шрифт – New Times Roman, полужирный, курсив.

Вариант №23.Создать макрос, который, начиная с текущей позиции, вводит названия двенадцати месяцев. Введенные значения должны быть следующего типа: шрифт – Courier, курсив, полужирный. размер – 22, цвет –

синий, фон – розовый.

Вариант №24.Создать макрос, который, начиная с текущей позиции, вводит арифметическую прогрессию с шагом 45, предельное значение прогрессии 617. Введенные значения должны быть следующего типа: шрифт – Times New Roman, курсив, размер – 12, цвет – коричневый, фон – голубой.

Вариант №25.Создать макрос, который данные в выделенной области выводит красным цветом на светло-голубом фоне.

Вариант №26.Создать макрос, который данные в выделенной области, приводит к денежному формату. шрифт – Arial, полужирный, размер – 11, символы светло-зелённого цвета.

Вариант №27.Создать макрос, который данные в выделенной области приводит к следующему типу: шрифт – Courier, курсив, полужирный. размер – 18, цвет – розовый, фон – голубой.

Вариант №28.Создать макрос, который данные в выделенной области приводит к следующему типу: выравнивание по правой границе, размер шрифта – 15. цвет – зелёный, фон – желтый.

Вариант №29.Создать макрос, который, начиная с текущей позиции, вводит арифметическую прогрессию с шагом 45, предельное значение прогрессии 617, и защищает лист от записи.

Вариант №30.Создать макрос, который выключает все панели инструментов и защищает текущий лист от изменения.