Курсова робота 
  з дисципліни 
  «Інформатика» 
  на тему: 
  «Застосування програмних комплексів для вирішення інженерних завдань» 
  Зміст 
   Введення 
 . Постановка завдання 
 . Вихідні дані 
 . Рішення завдання управління процесами перевезень в середовищі 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.....