Завдання: на основі хронометричних досліджень встановлено, що інтенсивність пасажиропотоку (кількість пасажирів, що перевозяться в одиницю часу) у певний час доби обчислюється за такою формулою:
S=120 + 1750 · e-x· sin(x),
де x = 3, 14·(t–6) / 9;
t –часдоби, протягом якого характеризуется пасажиропотік.
Кількість пасажирів, що перевозяться за певний час, обчислюється за такою формулою: 
, де t1 і t2 – початок і кінець часового інтервалу.
Розробити програму, в якій можна розрахувати кількість пасажирів, що перевозяться протягом певного часового інтервалу доби. Розрахувати також загальну кількість пассжиров, що перевозяться за тиждень в інтервалі часу з 6 до 15 години. Побудувати графік інтенсивності пасажиропотоку в інтервалі цього часу.
Виконання:
1. Створити початкову екранну форму згідно з рис. 8.10. На поверхні форми розміщено імена й назви компонентів, які використовуються за умовчуванням. Надалі імена кожного з компонентів не змінюються, а їх назви відповідають діям, із застосуванням яких вони виконуються.
|
| Рис. 8.10. Загальний вигляд початкових даних для створення екранної форми виконання завдання з прикладу 8.3
|
2. Послідовно виконати операції, спрямовані на створення екранної форми " Розрахунок пасажиропотоку", перелік яких подано в табл. 8.10.
Таблиця 8.10
Порядок створення екранної форми " Розрахунок пасажиропотоку"
| Операція
| Властивість об'єкта
| Значення властивості
|
| 1. Дати ім'я електронній формі
| Name
| Form1
|
| Caption
| Розрахунок_ пасажиропотоку
|
| 2. Створити рамку групи інструментів для введення початкових даних (інструмент Frame)
| Name
| Frame1
|
| Caption
| Початкові дані
|
| 3. Створити рамку групи інструментів для виведення розрахункових даних (інструмент Frame)
| Name
| Frame2
|
| Caption
| Розрахункові дані
|
| 4. Створити текстове вікно для назви лабораторної роботи
(інструмент TextBox)
| Name
| Text1
|
| Text
| Розрахунок пасажиропотоку на тролейбусному маршруті
|
| Multline
| True
|
| 5. Створити текстове вікно для виведення розрахункових даних (початок интервалу) (інструмент TextBox)
| Name
| Text2
|
| Text
| Порожньо
|
| 6. Створити текстове вікно для виведення розрахункових даних (кінець інтервалу) (інструмент TextBox)
| Name
| Text3
|
| Text
| Порожньо
|
| 7. Створити текстове вікно для виведення розрахункових даних (інструмент TextBox)
| Name
| Text4
|
| Text
| Порожньо
|
| 8. Створити текстове вікно для введення назви навчального закладу, інструмент TextBox)
| Name
| Text5
|
| Text
| Порожньо
|
| Multline
| True
|
| Продовження табл.8.10
|
| 9. Створити текстове вікно для введення початкових даних (інструмент TextBox)
| Name
| Text6
|
| Text
| Порожньо
|
| 10. Створити текстове вікно для введення початкових даних (інструмент TextBox)
| Name
| Text7
|
| Text
| Порожньо
|
| 11. Створити текстове вікно для виведення розрахункових даних тиждень (інструмент TextBox)
| Name
| Text8
|
| Text
|
|
| 12. Створити текстове вікно для виведення розрахункових даних за тиждень (інструмент TextBox)
| Name
| Text9
|
| Text
|
|
| 13. Створити текстове вікно для виведення розрахункових даних за тиждень (інструмент TextBox)
| Name
| Text10
|
| Порожньо
|
| 14.Створити лінійку прокручування для введення початку часового интервалу руху (інструмент HScrollBar)
| Name
| HScroll1
|
| Large
Change
|
|
| Max
|
|
| Min
|
|
| 15. Створити лінійку прокручування для введення кінцевого часу интервалу руху (інструмент HScrollBar)
| Name
| HScroll2
|
| Large
Change
|
|
| Max
|
|
| Min
|
|
| 16.Створити етикетку (інструмент Label)
| Name
| Label1
|
| Caption
| Число перевезених пасажирів з
|
| 17. Створити етикетку (інструмент Label)
| Name
| Label2
|
| Caption
| до
|
| 18. Створити етикетку (інструмент Label)
| Name
| Label3
|
| Caption
| години становить
|
| 19. Створити етикетку (інструмент Label)
| Name
| Label4
|
| Caption
| до
|
| Продовження табл.8.10
|
| 20. Створити етикетку (інструмент Label)
| Name
| Label5
|
| Caption
| Інтервал часу з
|
| 21. Створити етикетку (інструмент Label)
| Name
| Label6
|
| Caption
| години
|
| 22. Створити етикетку (інструмент Label)
| Name
| Label7
|
| Caption
| пасажирів
|
| 23. Створити етикетку (інструмент Label)
| Name
| Label8
|
| Caption
| Число перевезених пасажирів за тиждень в інтервалі часу з
|
| 24. Створити етикетку (інструмент Label)
| Name
| Label9
|
| Caption
| до
|
| 25. Створити етикетку (інструмент Label)
| Name
| Label9
|
| Caption
| Інтервал часу з
|
| 26. Створити етикетку (інструмент Label)
| Name
| Label10
|
| Caption
| години становить
|
| 27. Створити етикетку (інструмент Label)
| Name
| Label11
|
| Caption
| пасажирів
|
| 28. Створити етикетку (інструмент Label)
| Name
| Label12
|
| Caption
| Введіть початковий час інтервалу
|
| 29. Створити етикетку (інструмент Label)
| Name
| Label13
|
| Caption
| Введіть кінцевий час інтервалу
|
| 30. Створити етикетку (інструмент Label)
| Name
| Label14
|
| Caption
| Графік інтенсивності пасажиропотоку з 6 до 15 години, люд.–год
|
| Закiнчення табл.8.10
|
| 31. Створити вікно для побудови графіка інтенсивності пасажиропотоку (інструмент PictureBox)
| Name
| Picture1
|
| AutoRedraw
| True
|
| 32. Створити командну кнопку для виконання розрахунку інтенсивності вантажопотоку (інструмент CommandButton)
| Name
| Command1
|
| Caption
| Розрахунок пасажиропотоку
|
| 33. Створити командну кнопку для очищення полів (інструмент CommandButton)
| Name
| Command2
|
| Caption
| Очистити вікна
|
| 34. Створити командну кнопку для виходу з програми (інструмент CommandButton)
| Name
| Command3
|
| Caption
| Вихід
|
