
- •«Інформатика»
- •Інструментальне середовище Visual Basic for Application
- •Створення панелі інструментів
- •Створення макросів
- •Винесення кнопок макросів на власну панель інструментів
- •Редагування малюнка піктографічної кнопки
- •Редактор Visual Basic
- •Програмування алгоритмів лінійної структури
- •Постановка задачі
- •Блок-схема
- •Текст програми
- •Текст програми
- •Результати роботи програми
- •Перевірка роботи програми
- •Висновок
- •Список використаних літературних джерел
Програмування алгоритмів лінійної структури
Мета
роботи
оволодіння практичними навичками
розроблення та програмування
обчислювального процесу лінійної
структури і навичками налагодження й
тестування програм.
Постановка задачі
Потрібно побудувати алгоритм для обчислення значень заданої функції та накреслити його блок-схему. Скласти програму розв’язання даного завдання мовою Visual Basic for Application.
Необхідно розрахувати значення функції y і z згідно з формулами:
Перевірити роботу програми при значеннях a=3,2; b=17,5; x=4,8.
Блок-схема
Таблиця ідентифікаторів
Змінна алгоритму |
a |
b |
x |
y |
d |
e |
Ідентифікатор |
a |
b |
x |
y |
d |
Exp |
Тип данних |
Single |
Усі
змінні мають тип Single.
Змінні a,
b,
x,
– є вхідними
даними. Змінні
y
і d
–
результат
обчислення заданих функцій.
Текст програми
Sub лінійний()
' лінійний Макрос
MsgBox ("Лінійний алгоритм")
'оголошення змінних
Dim a As Single, b As Single, x As Single, y As Single, d As Single, Exp As Single
'уведення данних
a = InputBox("введіть a")
b = InputBox("введіть b")
x = InputBox("введіть x")
'обрахування змінних
y = b * Tan ^ 2 * x - a / Sin ^ 2 * (x / a)
d = a * Exp ^ -sqrta * Cos * (b * x / a)
'виведення даних
MsgBox ("значення y:" + Str(y))
MsgBox ("значення d:" + Str(d))
End Sub
Результати роботи програми
Щоб
протестувати
програму
слід використати змінні
які запропоновані в умові:
a=3,2;
b=17,5;
x=-4,8.
Тест програми (Рис. 2.2).
Рис. 2.2 Тестування програми
Перевірка
роботи програми
Для перевірки результатів роботи програми використаємо Microsoft Office Excel 2003.
Висновок: я навчився розробляти лінійні алгоритми та створювати за їх допомогою програми для знаходження розв’язків заданих функцій. Також при перевірці за допомогою Excel я переконався у тому, що програма правильно знаходить розв’язки функцій.
Програмування
алгоритмів розгалуженої структури
Мета роботи оволодіння практичними навичками розроблення та програмування обчислювального процесу розгалуженої структури, поліпшення навичок налагодження і тестування програм.
Розгалужений алгоритм – це такий алгоритм в якому послідовність дій може змінюватись в залежності від виконання чи не виконання певних умов.
Постановка задачі
Розробити алгоритм та програму розгалуженої структури для розрахунку значень заданої функції в залежності від значень вхідних даних.
Перевірити роботу програми при значеннях: a=2.5; b=0.4.
Блок-схема алгоритму
Блок-схему наведено на (Рис. 3.1).
Таблиця ідентифікаторів
Змінні |
a |
b |
t |
w |
Ідентифікатор |
a |
b |
t |
w |
Тип даних |
Single |
w = Sqr(a * t ^ 2 + b * Cos(t) + 1)
Рис. 3.1.Блок-схема алгоритму
розгалуженої структури