2 Завдання для лабораторної роботи.

Набрати приклад із методичних вказівок і розв’язати задачу згідно варианту.

1. Дано x=3.5, y=0.58, z= 7.48 Обчислити

2. Дано x=4.5, y=1.52 Обчислити

3. Дано x=2.1, y=1.5 z=0.85 Обчислити

4. Дано a=1.5, b=1.12, c=2.9, x=2 Обчислити

5. Дано x=1.58, y=9.52 Обчислити

6. Дано x=8.2, y=1.2, z=5 Обчислити

7. Дано x=7.7, y=3.32, z= 1.25 Обчислити

8. Дано x=41.5, y=1.52 ,z=2.2 Обчислити

9. Дано x=4.81, y=2.52, z=2.23 Обчислити

10. Дано x=8.1, y=4.2, z=1.15 Обчислити

11. Дано x=-4.5, y=8.52 , =8 Обчислити

12. Дано, =0.58, =0.35. Обчислити

13. Дано, =0.22, =1,2, =0.11. Обчислити

14. Дано x=12.2, c=8.52 , c=2, d=0.5 Обчислити

15. Дано a=11.8, x=1.52 , a=4, c=12.8, t=0.11 Обчислити

16. Дано a=1.82, x=3.52 , a=4. Обчислити

17. Дано α=12.8, β=0.52 .Обчислити

18. Дано x=0.512 , a=4, b=12.8.Обчислити

19. Дано x=4.52 , b=4, α=0.11 Обчислити

20. Дано x=0.82 , y=8.9.Обчислити ,

21. Дано y=1.18, x=8.52 .Обчислити , .

22. Дано y=0.213, x=8.52,z=0.12. ,

23. Дано y=7.18, x=4.71,z=0.17. , .

24. Дано y=0.88, x=0.11,z=12.17 ,

25. Дано y=0.33, x=0.71,z=0.172 ,

ПРИКЛАД ВИКОНАННЯ.

Дано x=41.5, y=1.52 ,z=2.2 Обчислити

Рисунок 2.1- Графічний алгоритм

2.1 Завантажити Excel. Виконати команду СЕРВІС →Макрос→Редактор VB( або Alt+F11);

2.2 Виконати команду ВСТАВКА→Модуль(меню Insert→Module). Коли зявиться вікно коду, необхідно скласти програму (макрос);

2.3 Вставити процедуру: ВСТАВКА→Процедура (меню Insert→Procedure).

Рисунок 3.1- Вікно Процедури.

2.4 У вікні Name вказати імя процедри Pruclad, тип –Sub. У вікні зявиться наступний код:

Public Sub Pruklad()

End Sub

2.5 Набрати наступний код програми:

Public Sub Pruklad()

'розділ опису змінних'

Dim x As Single, y As Single, z As Single

'основна частина програми'

'присвоєння іденифікатору х числового значення комірки А1 робочого Аркуша1'

x = Worksheets(1).Range("A1").Value

'присвоєння іденифікатору y числового значення комірки B1 робочого Аркуша1'

y = Worksheets(1).Range("B1").Value

'присвоєння іденифікатору z числового значення комірки C1 робочого Аркуша1'

z = Worksheets(1).Range("C1").Value

'Обчислення арифметичного виразу'

f = ((x + 1) / y) + Log(z) + (x ^ 2) / z

'відображення результату в комірці d1 робочого Аркуша 1'

Worksheets(1).Range("d1").Value = f

End Sub

2.6 У комірки A1,B1,C1 ввести числові значення.

2.7 Запустити програму на виконання. Меню Run→Run Sub→User Form (або F5, або кнопка на панелі інструментів (Рис.3.2)

Рисунок 3.2 – Запуск програми на виконання.

2.8 Перегляд результатів виконання на робочому Аркуші 1 (Рис.3.3)

Рисунок 3.3 – Результат виконання програми.

2.9 Обчислити значення виразу , використовуючи функції Excel. Порівняйте результати.

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

7. Яке призначення функції InputBox?

8. Як очистити форму?

9. Яке призначення функції MsgBox?

10. Поясніть синтаксис оголошення константи.

11. Поясніть синтаксис оголошення змінної.

12. Як визначається область дії даних?

13. Яка структура проекту?

14. Як залежить від типу числової змінної точність і швидкість виконання арифметични операцій?