
- •Методичні вказівки
- •Мовою Visual Basic for Application (vba)”
- •6.040303 Системний аналіз
- •1 Лабораторна робота №1
- •1.1 Теоретичні відомості
- •1.1.1 Функція InputBox
- •1.1.2 Процедура MsgBox
- •Текст процедури
- •Текст процедури
- •Результати роботи програми
- •2 Лабораторна робота №2
- •2.1 Створення макросів
- •2.2 Об’єкт Range, його властивості та методи
- •2.2.1 Деякі властивості
- •2.2.2 Деякі методи
- •2.3 Контрольні питання.
- •3.1.2 Оператор циклу по сімейству об'єктів.
- •3.1.3 Оператори циклу з умовою.
- •3.2 Контрольні питання.
- •3.3 Індивідуальні завдання
- •4 Лабораторна робота №4
- •4.1 Функції користувача
- •Текст програми – функції
- •Текст процедури для виклику функції
- •4.2 Процедури користувача
- •4.3 Контрольні питання
- •4.4 Індивідуальні завдання
- •5 Лабораторна робота №5
- •5.1 Створення нової форми
- •5.2 Деякі властивості та події елементів управління
- •5.3 Створення списків
- •5.4 Створення інтерфейсу користувача
- •Програмний код для кнопки CommandButton1 (подія Click)
- •Програмний код для кнопки CommandButton2 (подія Click)
- •5.5 Контрольні питання
- •5.6 Завдання
- •6 Лабораторна робота №6
- •6.1 Введення та виведення масивів
- •6.2 Контрольні питання
- •6.3 Індивідуальні завдання
- •Література
4.3 Контрольні питання
Опишіть структуру функції користувача.
Правила передачі параметрів. Типи параметрів.
Правила виклику функції та процедури.
Чим відрізняється функція від процедури?
4.4 Індивідуальні завдання
Розв’яжіть задачу №1 свого варіанту з лабораторної роботи №3 ще двома способами:
– напишіть дві функції для обчислення значень Y і Z;
– напишіть процедуру, яка обчислює значення Y і Z.
Напишіть підпрограми для виклику функцій і процедури та обчислення Y і Z для заданих значень Х.
Напишіть процедуру для розв’язку завдання свого варіанту.
Варіант 1
На Листі Excel знаходяться координати двох векторів:
Х=(х1 , х2, ,…х10) та Y=(y1 , y2 , …y10)
Знайти кут φ між векторами за формулою:
,
де
(х,
y)
– скалярний добуток. Для його обчислення
за формулою:
створити функцію або процедуру.
Варіант 2
На Листі Excel знаходиться послідовність чисел х1 , х2, ,…х20. Задані також числа a і b. Вивести в інший стовпчик на Листі Excel ті з чисел, які належать інтервалу [a, b]. Перевірку того, чи належить число інтервалу, здійсняти в процедурі. Підрахувати кількість таких чисел.
Варіант 3
На Листі Excel знаходяться координати двох векторів:
.
Вивести повідомлення модуль якого з векторів більше. Модуль вектора обчислювати в процедурі або функції за формулою:
Варіант 4
На Листі Excel знаходяться координати десяти точок (xі , yі). Поруч з кожною точкою записати знаходиться вона в прямокутнику ABCD або за його межами. Значення a, b, c, d – задані. Перевірку нерівностей здійсняти в процедурі.
Точка
знаходиться в межах прямокутника, якщо
виконуються нерівності
.
Варіант 5
На Листі Excel в трьох стовпчиках знаходяться значення a, b і c довжин сторін десяти трикутників. Поруч з кожним записати його площу, або текст „Трикутник не існує”. Обчислення площі та перевірку існування трикутника здійснювати в процедурі.
Площу трикутника знаходити за формулою Герона:
,
де півпериметр p
=(a + b + c)/2.
Трикутник існує лише тоді, коли кожна його сторона менша, ніж сума двох інших.
Варіант 6
На Листі Excel в двох стовпчиках знаходяться полярні координати (, ) дванадцяти точок на площині. Значення кута задаються в радіанах. Обчислити та вивести поруч градусну міру кута та декартові координати цих точок (x , y) за формулами:
Обчислення здійснювати в процедурі.
Варіант 7
Для заданого натурального числа N вивести на Лист Excel всі прості числа, що не перевершують його, та підрахувати їхню кількість. Число – просте, якщо воно не ділиться на жодне ціле число, крім себе й одиниці. Розпізнавання простого числа оформити у вигляді процедури.
Варіант 8
На Листі Excel в трьох стовпчиках знаходяться координати десяти точок (xі , yі , zi ).Точка М (a, b, c) завдається своїми координатами. Знайти відстань від кожної з точок до точки М і вивести поруч з координатами точки на Лист Excel. Написати функцію або процедуру для обчислення відстані S між двома точками за формулою:
Варіант 9
На
Листі Excel
знаходяться координати двадцяти точок(xі
,
yі).
Коло задається рівнянням
.
Значенняa,
b
та
r
відомі.
Поруч з кожною точкою записати де вона
знаходиться відносно кола: на колі,
всередині кола або зовні. Перевірку
здійсняти в процедурі. Підрахувати
кількість точок, що знаходяться на колі.
Варіант 10
На Листі Excel в діапазоні A1 : C25 знаходяться цілі числа. Для кожного стовпчика підрахувати кількість парних чисел і вивести повідомлення в якому стовпчику їх більше.
Перевірку чисел та підрахунок кількості парних здійснювати в процедурі або функції. Для визначення парне число чи ні, рекомендується використовувати функцію mod залишку від ділення на 2.
Варіант 11
Дано
ціле число N.
Підрахувати значення
за формулою:
,
написавши процедуру для обчислення
факторіалу.
Варіант 12
В діапазоні А1 : А20 знаходяться цілі числа. Для кожного з них підрахувати кількість повторень. Знайти число, яке зустрічається найчастіше у заданій послідовності. Написати процедуру для підрахунку кількості однакових чисел.