If r Then

st = "Належить області 1 та області 2 "

Else

st = "Не належить "

End If

ElseIf CheckBox1.Value = True Then

If x ^ 2 + y ^ 2 <= 1 Then

st = "Належить області 1"

Else

st = "Не належить "

End If

ElseIf CheckBox2.Value = True Then

If x >= 0 And y >= 0 And y <= -2 * x + 2 Then

st = "Належить області 2"

Else

st = "Не належить "

End If

Else

st = "Помилка! Не вибрана область "

End If

TextBox3.Text = st

End Sub

Результати розрахунків наведені на рис. 1.24 .

Рисунок 1.24 – Результати роботи програми

1.4 Контрольні питання

1.4.1 Що таке проект VBA?

1.4.2 Які вікна можуть бути відкриті у вікні Редактор Visual Basic ?.

1.4.3 Які типи даних використовує VBA?

1.4.4 Оператор присвоювання, правила запису виразів.

1.4.5 Логічні відношення, логічні операції, правила запису логічних виразів.

1.4.6. Умовний оператор If-Then-Else , модифікації.

1.4.7 Оператор вибору Select Case , та способи запису умов.

1.4.8 Діалогові вікна InputBox, MsgBox, їх призначення.

1.4.9 Поняття форми, властивості і методи форми.

1.4.10 Елемент керування – командна кнопка , властивості і події, які із ним пов’язані.

1.4.11 Елемент керування текстове поле, його властивості, методи і події, що з ним пов’язані.

1.5 Варіанти завдань

Завдання 1.5.1

1 2 3

4 5 6

7 8 9

10 11 12

13 14 15

16 17 18

19 20 21

22 23 24

25

Завдання 1.5.2

1 Для натурального числа N (N<100) визначити чи кратно воно 5 . Використовувати властивість, якщо остання цифра числа 0 чи 5 , то число кратне.

2 Задано координати крапки А(х, у) . Визначити її розташування щодо окружності x² + y² = 9 .

3 Задані дійсні числа x, y, z . Обчислити max{(x+y+z)/2, xy} .

4 Відомо, що діаметр окружності дорівнює L , а діагональ квадрата − Р . Визначити, чи поміститься квадрат у колі.

5 Для натурального числа N (N<100) визначити, чи поділяється воно на 10 без залишку. Використовувати властивість, якщо остання цифра дорівнює 0 ,то поділяється..

6 Задані дійсні числа x, y, z . Обчислити min{xyz , (x+y+z)/2} .

7 Задано координати крапки В(х, у) . Визначити її розташування щодо параболи 2х² - Зх + 2 - у = 0 .

8 Відрізок АВ задано координатами своїх кінців − x₁, y₁, x₂ , y₂ . Визначити, чи поміститься відрізок у квадраті, сторона якого дорівнює а .

9 Дано дійсне число х . Визначити, чи є воно коренем рівняння

2х² - Зх + 2 = 0 .

10 Для натурального числа N (N<100) визначити чи кратно воно 3 . Використовувати властивість, якщо сума цифр поділяється на 3 , то число кратне.

11 Задані дійсні числа x, y, z . Обчислити max{xz , xy} .

12 Відомо, що діагональ квадрата дорівнює Р , а діаметр окружності − L . Визначити, чи поміститься коло у квадраті.

13 Для натурального числа N (N<100) визначити чи є парною друга його цифра.

14 Задано координати крапки С(х, у) . Визначити її розташування щодо окружності (x – 1)² + y² = 4 .

15 Відомо, що більша сторона прямокутника дорівнює а , а діаметр окружності − d . Визначити, чи поміститься коло у прямокутник.

16 Дано дійсне число х . Визначити, чи є воно коренем рівняння

4х⁴ – 16х³ + 3х² + 4х - 1 = 0 .

17 Для натурального числа N (N<100) визначити чи є непарною перша його цифра.

18 Задані дійсні числа а, b, c . Обчислити min{(ac)/2, b²} .

19 Відрізки АВ і CD задані координатами своїх кінців − x_а , y_а , x_b , y_b , x_c , y_c , x_d , y_d . Визначити, довжина якого відрізка більша.

20 Відомо, що діаметр окружності дорівнює d , а більша сторона прямокутника − b . Визначити, чи поміститься прямокутник у коло.

21 Для натурального числа N (N<100) визначити чи є парною сума його цифр.

22 Відрізок CD задано координатами своїх кінців − x₁, y₁, x₂ , y₂ . Визначити, чи поміститься відрізок у прямокутник, сторони якого дорівнюють а і b .

23 Задані дійсні числа а, b, c . Обчислити max{(2ac),cb²} .

24 Задано координати крапки В(х, у) . Визначити її розташування щодо окружност (х – З)² + у² = 1 .

25 Для натурального числа N (N<100) визначити чи поділяється сума його цифр на 3 без залишку.

Завдання 1.5.3

1 Показання електричного лічильника рівні М кВт . Обчислити вартість використаної електроенергії, якщо розрахунок ведеться за таким тарифом:

15 коп. за 1 кВт за перші 500 кВт ;

18 коп. за 1 кВт , якщо використано більше, ніж 500 кВт і менше, ніж 1000 кВт ;

22 коп. за 1 кВт, якщо використано більше 1000 кВт .

2 Студент одержує на іспиті оцінку 2, 3, 4 або 5 . Записати її словами: незадовільно, задовільно, добре, відмінно .

3 На складі проходить зниження ціни на товари:

якщо товар зберігається більше 10 місяців, то його ціна зменшується в 2 рази;

якщо термін збереження більше 6 місяців і менше(або дорівнює) 10 місяців, то — у 1,5 рази.

Обчислити нову ціну товару, якщо первісна його ціна М гр. і дата виготовлення К .

4 У магазині існує гнучка система знижок:

якщо товару придбано не менше, ніж на 1000 гр., то знижка становить 1% ;

додатково за суму, що перевищує 1000 гр. знижка − 2% .

Обчислити, яку суму повинен заплатити клієнт, якщо він придбав товару на М гр .

5 Порівняйте фактичні і заплановані витрати, значення яких необхідно ввести. Якщо витрати перевищують бюджет більше ніж на 10% , то вивести повідомлення „Перевищення бюджету”; якщо витрати більше ніж на 10% менше запланованих, то − „Усе йде за планом”; а в інших випадках − „Відповідає бюджету” .

6 Студент на тестуванні набрав М балів. Визначте значення його рейтингу за наступним правилом:

до ЗО балів − рейтинг „низький” ;

від ЗО до 60 балів − рейтинг „середній” ;

більше 60 балів − рейтинг „високий” .

7 Записати словами знаки арифметичних дій: +, −, ∙, / .

8 Витрати води дорівнюють М літрів. Обчислити вартість використаної води, якщо розрахунок ведеться за таким тарифом:

0,04 гр. за літр за перші 100 літрів;

0,02 гр. за кожен наступний літр.

9 В аптеці для дітей до 14 років діє знижка 5% і для пенсіонерів − 10% . Скільки повинен заплатити клієнт, якщо він придбав лік на М гр. , йому К років і пенсійний вік для нього – С .

10 Студенти одержують стипендію N гр. . За середній бал від 4,5 до 4,8 додатково виплачується 50 гр. , а за більше, ніж 4,8 балів − 100 гр. . Обчислити розмір стипендії, якщо студент одержав М балів.

Розмір стипендії N відомий.

11 Клієнт замовив у туристичній фірмі М путівок за ціною К гр. за штуку. Якщо він замовив більше двох путівок, то одержує знижку в розмірі 3% від їхньої вартості, а більше п'яти − 10% . Яку суму повинен заплатити клієнт?

12 Співробітникам фірми виплачується річна премія в залежності від стажу роботи:

до 1 року — премії немає;

від 1 до 5 років − 10% від зарплатні;

більш ніж 5 років − 20% від зарплатні.

Обчислити розмір премії робітника, якщо його зарплатня дорівнює Z , а стаж роботи − К .

13 Введіть назву місяця і визначте, до якої пори року він відноситься.

14 Фірма виплачує наприкінці місяця своїм продавцям премію в розмірі 5% , якщо товару продано на суму менше 1000 гр., і 6%, якщо продано на суму більше 1000 гр. Крім того, розмір премії збільшується на 1% , якщо продавець проробив у фірмі більше 5 років. Обчислити розмір премії продавцю, якщо він продав товару на М гр. і проробив у фірмі К років.

15 З клавіатури вводиться деяке число від 1 до 9 . Записати його словом.

16 Магазин продав продукції на М гривень. Нарахуйте премію за підсумками роботи за наступними правилами:

якщо продукції продано не менше, ніж на 1000 гр. , то премія становить 10% ;

додатково нараховується 5% за суму, що перевищує 1000 гр. .

17 Позначення сторін світу N, S, W, Е записати словами північ, південь, захід і схід відповідно.

18 Підприємство надає робітникам допомогу на дітей наступним чином:

якщо дітей немає , то допомога не надається ;

якщо дітей не більше 2-х − 30% від посадового окладу на кожну дитину;

якщо дітей 3 і більше − 50% від посадового окладу на кожну дитину.

Визначити допомогу, якщо посадовий оклад робітника М грн. і у ньго N дітей.

19 З клавіатури вводиться номер місяця. Вивести кількість днів у ньому.

20 З клавіатури вводиться символ кольору. Записати його словом., якщо кольори позначино наступним чином: R − червоний , G − зелений, W − білий , B − чорний .

21 З робітників утримується податок за бездітність наступним чином:

якщо дітей немає , то податок складає 30% ;

якщо дітей не більше 2-х − 10% ;

якщо дітей 3 і більше − податок не утримується .

Визначити податок, якщо робітнику нараховано М грн. і у ньго N дітей.

22 Точка на площині задана своїми координатами (х,у) . Визначити номер чверті, у якій вона знаходиться.

23 Оклад службовця дорівнює М гривень. З нього утримується прибутковий податок по наступній схеиі:

до 500 гр. − не утримується ;

від 501 до 5000 гр. − 13% від суми, що перевищує 500 гр.;

від 5001 до 10000 гр. − 15% від суми, що перевищує 10001 гр.;

від 10001 − 30% від суми, що перевищує 10001 гр.

Підрахувати суму прибуткового податку.

24 АТС надає своїм клієнтам К абонентських хвилин на міські розмови за ціною Р грн. Сплата за телефон нараховується наступним чином:

якщо кількість хвилин міських розмов не перевищує кількості абонентських хвилин К , то сплата становить Р грн. ;

якщо кількість хвилин міських розмов перевищує кількість абонентських хвилин К , то сплата нараховується по схемі: Р грн. за К абонентських хвилин плюс 30% від Р грн. за кожну хвилину, що перевищує К .

25 У магазині існує гнучка система знижок:

якщо покупець має дисконтну картку, то йому надається знижка у 5% на всю суму;

а також для всіх покупців:

якщо товару придбано не менше, ніж на 500 гр., то знижка становить 1% ;

додатково на суму, що перевищує 1000 гр. знижка − 2% .

Обчислити, яку суму повинен заплатити клієнт, якщо він придбав товару на М гр з дисконтною карткою і без неї.

Завдання 1.5.4

За заданим значенням аргументу х обчислити значення функції y=f(x) , графіки залежності якої наведені на рис. 1.25 .

1) 2)

3) 4)

5) 6)

7) 8)

9) 10)

11) 12)

13) 14)

15) 16)

17) 18)

19) 20)

21) 22)

23) 24)

25)

Рисунок 1.25 – Графіки функцій

Завдання 1.5.5/1.5.6

Задачі цього завдання розв’язуються за допомогою перемикачів OptionButton та прапорців CheckBox . Варіанти заштрихованих областей показано на рис. 1.26 .

1 Задане дійсне b . Обчислити:

• площу кола, якщо b – це його радіус ;

• площу кільця, внутрішній діаметр якого b ,а зовнішній втричі більший.

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

2 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , б ;

• заштрихованій області на рис. 1.5 , д ;

• обом заштрихованим областям – рис. 1.5 , б і д .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

3 Фахівці вважають, що ідеальна маса (кг) здорового чоловіка обчислюється за формулою:

m = (3*А − 450 + У)*0,25 + 45 ,

а ідеальна маса здорової жінки:

m = (3*А − 450 + У)*0,225 + 40 ,

де А − зріст (см) ;

У − вік (роки) .

Розрахувати ідеальну масу для чоловіка або для жінки. Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

4 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , є ;

• заштрихованій області на рис. 1.5 , д ;

• обом заштрихованим областям – рис. 1.5 , є і д .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

5 Задано радіус кола r і прямокутник, сторони якого дорівнюють a, b . Визначити:

• чи поміститься прямокутник у коло;

• чи поміститься коло в прямокутник.

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

6 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , в ;

• заштрихованій області на рис. 1.5 , г ;

• обом заштрихованим областям – рис. 1.5 , в і г .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

7 3адано ціле додатнє число N (N<1000) . Обчислити:

• суму першої і останньої цифри числа N ;

• добуток першої і другої цифри числа N .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

8 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , а ;

• заштрихованій області на рис. 1.5 , г ;

• обом заштрихованим областям – рис. 1.5 , а і г .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

9 Дано дійсні числа а > 0 , Ь > 0 , с > 0 . Знайти серед них:

• max ;

• min .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

10 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , а ;

• заштрихованій області на рис. 1.5 , є ;

• обом заштрихованим областям – рис. 1.5 , а і є .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

11 Дано дійсне число х .Розрахувати :

• площу квадрата, якщо х − це його сторона,

• об’єм кулі ,якщо х − це його радіус.

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

12 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , а ;

• заштрихованій області на рис. 1.5 , з ;

• обом заштрихованим областям – рис. 1.5 , а і з .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

13 Визначити розташування крапки А(х ,у ) :

• щодо окружності ,

• щодо параболи .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

14 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , є ;

• заштрихованій області на рис. 1.5 , і ;

• обом заштрихованим областям – рис. 1.5 , є і і .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

15 Відомі діаметр кола d і сторона квадрата а . Визначити:

• чи поміститься квадрат у колі ;

• чи поміститься коло в квадраті .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

16 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , а ;

• заштрихованій області на рис. 1.5 , ж ;

• обом заштрихованим областям – рис. 1.5 , а і ж .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

17 Дано дійсні числа x, y, z . Обчислити:

• ;

• .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

18 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , к ;

• заштрихованій області на рис. 1.5 , і ;

• обом заштрихованим областям – рис. 1.5 , к і і .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

19 З якою швидкістю повинен бігти спортсмен, щоб за 1 годину пробігти:

• дистанцію в 10 км ;

• дистанцію в 15 км .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

20 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , к ;

• заштрихованій області на рис. 1.5 , д ;

• обом заштрихованим областям – рис. 1.5 , к і д .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

21 Дано дійсне число а .Обчислити :

• об’єм куба , якщо а − це його сторона ;

• радіус кулі ,якщо а − це його об’єм .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

22 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , к ;

• заштрихованій області на рис. 1.5 , г ;

• обом заштрихованим областям – рис. 1.5 , к і г .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

23 3адано ціле додатнє число N (N<1000) . Визначити:

• чи поділяється воно на 10 без залишку ;

• чи поділяється воно на 3 без залишку .

Використовувати властивість, якщо остання цифра 0 ,то число поділяється на 10 і, якщо сума цифр поділяється на 3 , то і число поділяється на 3 .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

24 Дано дійсні числа х і у . Визначити, чи належить крапка з координатами (х, у) :

• заштрихованій області на рис. 1.5 , л ;

• заштрихованій області на рис. 1.5 , г ;

• обом заштрихованим областям – рис. 1.5 , л і г .

Користувач обирає потрібну область за допомогою прапорців (CheckBox) .

25 3адано ціле додатнє число N (N<100) . Визначити:

• чи є воно парне ;

• чи є воно непарне .

Варіант обирається користувачем за допомогою перемикачів (OptionButton) .

а) б) в)

г) д) є)

ж) з) і)

к) л)

Рисунок 1.26 – Варіанти областей