Курсова робота
з дисципліни
«Інформатика»
на тему:
«Застосування програмних комплексів для вирішення інженерних завдань»
Зміст
Введення
. Постановка завдання
. Вихідні дані
. Рішення завдання управління процесами перевезень в середовищі Pascal
.1 Алгоритм рішення задачі
.2 Текст програми
.3 Результати роботи програми
. Рішення завдання засобами MS Excel
.1 Вихідні дані і підсумки по рядках і стовпцях
.2 Розрахунки за завданням
.3 Діаграма за результатами розрахунку
. Рішення завдання засобами MATHCAD
Висновок
Список літератури
Введення
Обчислювальна техніка - це сукупність технічних і математичних засобів, що використовуються для автоматизації процесів обчислень і обробки інформації, а також галузь техніки, що займається розробкою, виготовленням і експлуатацією цих коштів. Найбільш істотно застосування засобів обчислювальної техніки в системах автоматичного управління при зборі, обробці та використанні інформації з метою обліку, планування, прогнозування й економічної оцінки, для прийняття науково обгрунтованих рішень. Інтенсивний розвиток обчислювальної техніки проникло у всі сфери життя людини, в тому числі і в транспортній галузі.
У цій роботі необхідно навчитися вирішувати транспортні завдання засобами Pascal, Ms Excel, MathCad. У рамках виконання курсової роботи моєю метою є вирішення транспортних завдань в середовищі Pascal ABC, засобами електронних таблиць MS Excel і пакету автоматизації математичних і інженерних розрахунків MathCAD. На прикладі поставленого завдання мені належить освоїти складання алгоритму з використанням допоміжних алгоритмів, написати програму з використанням процедур і вирішити завдання в Mathcad і MS Excel, роздрукувати результати.
1. Постановка завдання
Потрібно провести розрахунки по таблиці перевезень вантажів між окремими регіонами за допомогою 3-х додатків - табличного процесора MS Excel, пакета автоматизації математичних і інженерних розрахунків MathCAD і середовища програмування Pascal ABC.
Необхідно:
а) знайти підсумки по рядках і стовпцях таблиці;
б) визначити суму кількості вантажів, що перевозяться у місцевому сполученні по всіх регіонах (сума даних по головній діагоналі матриці)
в) виконати індивідуальне завдання:
Визначити регіони для максимальної перевезення, розташованої вище головної діагоналі матриці. Всі розміри відправлення вантажу на відповідний регіон зменшити на 9%
г) роздрукувати вихідну і результуючу (змінену) таблицю перевезень, а також всі розрахункові дані.
2. Вихідні дані
Кількість регіонів - 7
Таблиця перевезень вантажів (в умовних одиницях) між отделбнимі регіонами
9 86 68 7 Березня 99
36 46 10 14 47 66
63 41 3 12 84 20
77 18 25 84 98 92
36 17 0 39 83 12
73 46 33 15 29 74
3 46 23 квітня 11 61
Назви регіонів:
Бургундія
Корсика
Гваделупа
Мартініка
Гвіана
Пікардія
Майотта
3. Рішення завдання управління процесами перевезень в середовищі Pascal
3.1 Алгоритм рішення задачі
Рисунок1 Блок-схема головної програми
Рисунок2 Блок-схема процедури Vivodfile
Рісунок3 Блок-схема процедури
Малюнок 4. Блок-схема процедури Raschet
Малюнок 6. Блок-схема процедури Vivod
Малюнок 5. Блок-схема процедури Vvod1
3.2 Текст програми
pascal excel mathcad завдання
Program Perevozki; N=7; Mas=array [1..N, 1..N] of real; A: Mas; _stolbcov: array [1..N] of real; _strok: array [1.....