Міністерство освіти і науки України
Івано-Франківський національний технічний університет нафти і газу
Лабораторна робота VBA№3
Тема: «Циклічні алгоритми у середовищі VBA»
Виконав:
Студент групи
Івано-Франківськ2020р.
СТВОРЕННЯ БЛОК-СХЕМИ
ПОЧАТОК
КІНЕЦЬ
Друк
a=3.2; N=7
Умова.
Скласти графічний алгоритм і програму обчислень таблиці значень функції
Аргумент х змінюється від початкового значення f=-4.8 з постійним кроком 0.7, кількість значень функції n=7.
Графічний алгоритм і програми скласти з використанням оператора циклу та умовного оператора.
Розв’язок задачі :
Визначаємо крок зміни аргументу функції :
n*df=fk-fp
df=0.7
Графічний алгоритм з використанням оператора циклу показаний на рис. 1, з використанням умовного оператора на рис. 2.
Public Sub CYKL()
Dim a, f, fp, fk, df As Double, c As Single, n As Integer
a = 3.2
fp = -4.8
fk = 0.1
n = 7
df = fk-fp/(n-1)
For f = fp To fk Step df
c = ((f ^ (a + 1)) + (f ^ (a - 1))) / Abs(a + f)
Debug.Print "c="; c, "f="; f
Next
End Sub
З використанням оператору циклу :
