|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
№28 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
3 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
x |
2 |
|
d |
2 |
b |
2 |
|
|
e |
a |
, |
x d ; |
|||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||||
|
|
|
|
|
|
|
x d) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
f (x) |
|
cos( |
|
|
|
|
|
, |
|
|
|
|
|
|
|
|
|
x d ; |
||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
|
|
sin( |
b a) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
a 2 b2 |
|
3 edx |
, |
|
x d |
||||||||||||||||||||||||||
|
|
lg |
|
|
||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
x1 |
0,94 ; |
|
|
|
|
x 2 |
|
|
1,86 |
; |
|
|
|
x 3 |
0,39 . |
|||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
№29 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
a |
2 |
c |
2 |
|
|
|
|
|
|
|
x c; |
||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||
|
|
arccos |
|
|
|
|
|
|
, |
|
|
|
||||||||||||||||||||||
|
|
(x b)2 |
|
|
|
|||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||
y(x) |
|
2 |
(x c) e |
cos ab |
, |
|
x c; |
|||||||||||||||||||||||||||
sin |
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||
|
|
|
2 |
(x 4,7c) |
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||
|
|
|
sin |
|
|
, |
|
|
|
|
|
x c; |
||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||
|
|
|
|
|
|
xa b |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
x1 |
0,607 ; |
|
|
|
|
x2 |
|
1,57 |
; |
|
|
|
|
|
x3 |
0,29 . |
||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
№30 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
ex cos b |
ln |
|
a c |
|
|
|
|
|
|
|
|
|
|
|
, |
|
x b; |
|||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
f (x) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
, |
|
x b; |
||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||
tg(x b)2 3 ac 2 |
|
|
|
|
||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
a2 b |
2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
; |
|
|
|
|
|
|
, |
|
x b; |
||||||||||||||
|
|
arcsin |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||
|
|
|
|
|
|
|
|
(c |
|
x) |
2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||
x1 |
|
|
|
|
x2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
x3 |
|
|
|||||||
0,368 ; |
|
|
|
2,17 ; |
|
|
|
0,28 . |
110
a e 0,2 ;
b 3 ln 5;
d cos ; 9
|
tg |
|
|
|
||||||
|
|
|
|
|
||||||
a |
|
|
4 |
|
|
; |
||||
|
|
|
|
|
|
|
||||
2 |
|
|||||||||
|
|
|
|
|
|
|||||
b ln 3; |
||||||||||
c |
1 |
|
; |
|||||||
|
|
|
|
|
|
|||||
|
|
|||||||||
|
|
|
|
|
e |
a 37 ;
b e 1 ;
c 4arctg ; 3
2. 4. Програмування алгоритмів циклічної структури.
Лабораторна робота №3
2.4.1. Завдання №3.1 (арифметичний цикл)
Мета:
навчитись складати блок-схеми алгоритмів циклічної структури типу арифметичний цикл;
навчитись використовувати для організації арифметичних циклів оператор управління системи програмування Visual Basic 6.0 – For…Next;
набути навичок створення багаторядкового текстового поля.
Теоретичні відомості.
Для виконання лабораторної роботи необхідно вивчити теоретичний матеріал, який розташований на ст. 10, ст. 48 – ст. 49, ст. 56 – ст. 61 даних методичних вказівок. Література: [1; 2; 3].
ЗРАЗОК ВИКОНАННЯ ЗАВДАННЯ
Умова. Скласти схему та програму для обчислення значень функції:
y |
arctg (b x) |
; |
b 0,75 |
; x 1,35; 1,4; 1,45; |
... ; 2,0 , де |
|
|||||
|
1 sin 2 x |
|
|
|
аргумент х змінюється від х1 до хn із кроком у вигляді таблиці значень x та y. Значення y вивести із чотирма знаками після коми.
Порядок виконання завдання
І. Скласти алгоритм обчислення зна-
чень функції y. В алгоритмі багаторазово повторюється одна й та сама послідовність дій, яка називається тілом циклу.
Кількість повторень у такому циклі можна визначити за формулою
nxn x1 1.
dx
Цикл із відомою кількістю повторень називається арифметичним.
Для реалізації циклу використаємо опе-
ратор For … Next.
Введемо початкове значення параметра циклу – x1 = 1,35; відповідно кінцеве – xn = 2,0; крок зміни – dx = x2 - x1 = 0,05.
111
х. Результати обчислень вивести
Схема
Початок
Введення b, x1, xn, dx
x = x1, xn, dx
yarctg (bx) 1 sin 2 x
Виведення x, y
Кінець
. Реалізація етапу візуального програмування.
ІІ.1. Розробити форму та її вміст. Для реалізації завдання будемо використовувати одну екранну форму. Форма повинна вміщувати дві командні кнопки та багаторядкове текстове поле, у яке здійснюватиметься вивід x та y. Початкові дані b, x1, xn, dx будуть виведені на форму за допомогою оператора Print.
Щоб знати, де знаходяться початкові дані, а де результати розрахунків, їх необхідно підписати, створивши до них поля написів (мітки). У вікні форми слід запрограмувати наступні об’єкти:
мітки Label1, Label2;
текстове поле Text1 для виведення даних;
командні кнопки Command1, Command2.
ІІ.2. Для накреслених об’єктів слід змінити такі властивості:
Об’єкт |
Властивість |
Пояснення |
Значення |
|
властивостей |
||||
|
|
|
||
Text1 |
Text |
Введення тексту |
Пусто. |
|
|
|
або пусто |
|
|
|
MultiLine |
Багаторядкове |
True |
|
|
ScrollBars |
Наявність смуг |
3Both (горизонтальна та |
|
|
|
прокручування |
вертикальна) |
|
Label1 |
Caption |
Текст надпису |
Початкові дані |
|
Label2 |
Caption |
Текст надпису |
Виводиться під час ви- |
|
|
|
|
конання програми |
|
Command1 |
Caption |
Текст надпису |
Розрахунки |
|
Command2 |
Caption |
Текст надпису |
Вихід |
|
|
|
|
|
Інші властивості об’єктам задати самостійно.
. Приступаємо до етапу програмування у вхідному коді.
ІІІ.1. Два рази клацнути по кнопці<Розрахунки>. У вікні Project1–Form1 (Code) з’явиться заголовок процедури Private Sub Command1_Click() та її кінець End Sub. Після заголовку процедури набрати текст (тіло програми) (рис. 11).
ІІІ.2. Два рази клацнути по кнопці <Вихід>. У вікні Project1–Form1 (Code) з’явиться заголовок процедури та її кінець. Після заголовку процедури набрати
End (рис. 11).
IV. Після завершення написання кодів натиснути кнопку < Start > на панелі інструментів Standard (Стандартна). З’явиться вікно форми Арифметичний цикл. Клацнути по кнопці <Розрахунки>. (рис. 12). Переписати результати розрахунків.
V. Для завершення роботи й повернення у вікно коду натисніть командну кнопку <Вихід>.
VI. Збережіть проект у папку Lab_3(1).
112
Рис. 11. Вікно Project-Form1 (Code)
Рис. 12. Форма з результатами розрахунків
113
ІНДИВІДУАЛЬНІ ЗАВДАННЯ
Скласти схему та програму для обчислення відповідної до кожного варіанту функції. Аргумент x змінюється від x1 до xn із кроком x. Параметри x1 , xn , x визначити із зазначеної послідовності зміни аргументу. Вивести початкові дані та результати обчислень у вигляді таблиці значень x, y.
№1
№2
№3
№4
№5
№6
№7
y |
arctg(bx) |
|
; b 0,75 ; |
x 1,3; |
1,4; 1,5; ... ; |
2,5 |
||||||||||||||||||||||||||||||
1 sin 2x |
|
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||
y |
|
|
|
|
|
|
|
a bx |
; |
a 19,6; |
|
b 7,8; |
x 14,6; 14,7; 14,8; |
... 16 |
||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||
|
|
|
|
|
|
|
|
ln2 x |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||
y |
|
a ln 2 x |
; |
|
a 1,38; |
b 1,26; |
x 6; |
7; 8; ... |
; |
15 |
||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||
|
|
|
|
|
||||||||||||||||||||||||||||||||
|
|
|
|
|
|
b |
|
|
|
x |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
y |
sin |
x |
cos x |
; |
b 1,68; |
x 1,2; |
1,4; |
1,6; ... |
; |
2,4 |
||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||||
|
|
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
x bx |
|
|
|
|
|
|
|
|
|
|
|||||||||||||||
y |
|
|
ln |
|
x b |
|
|
|
; |
|
b 0,36; |
|
a 5,5; |
x 1; 1,5; |
2; ... ; |
8 |
||||||||||||||||||||
|
|
|
|
|
|
|||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||||||
a |
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||||||
|
|
|
|
|
x3 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||
y |
|
|
|
|
|
|
eax |
b |
; |
|
b 0,9; |
a 1,85; |
x 1; |
1,1; 1,2; ... ; 2 |
|
|||||||||||||||||||||
1 cos2 x |
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||
y |
a sin2 x |
|
; |
b 1,24; |
a 0,67; |
x 10,2; 10,4; 10,6; |
... ; 12 |
|||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||
|
cosx b2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
№8 |
y |
a |
x bx |
|
; b 2,8; |
a 0,45; x 4; |
4,2; |
4,4; ... ;6 |
|||||||
|
|
lnx a |
|||||||||||||
|
|
|
|
|
|
|
|
|
|||||||
|
|
|
|
|
|
|
|
|
|
||||||
|
|
|
|
|
b |
; |
|
|
|
|
|
|
|||
№9 |
y |
|
|
ax |
b 20,2; |
|
a 0,76; x 3,5; |
3,6; |
3,7; |
... ; 5 |
|||||
|
|
|
|
|
|||||||||||
|
|
|
|
tgx2 |
|
|
|
|
|
|
|||||
№10 |
y |
ea bx |
; |
b 4,6; |
a 2,5; x 0,75; 0,8; 0,85; |
... ; 1,5 |
|||||||||
2 |
|||||||||||||||
|
|
|
|
b lnx |
|
|
|
|
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|
114 |
|
|
|
№11
№12
№13
№14
№15
№16
№17
№18
y |
arctg(b |
|
x) |
; |
a 7,38; |
b 0,3; |
x 9; 10; 11; ... ; |
17 |
|
|
|
||||||
|
1 ax |
|
|
|
|
y tg(ax b); a 0,55; b 0,75; x 4,2; 4,4; 4,6; ... ; 6 ex ea
y |
sin(a x) |
; |
a 0,28; |
b 1,35; |
x 0,5; 0,6; |
0,7; |
... 1,5 |
|
|
|
|||||||
|
|
ax b |
|
|
|
|
|
|
y |
|
ex b |
; a 0,9; |
b 0,66; |
x 1,3; 1,4; |
1,5; |
... 2,5 |
|
|
ab cosx2 |
|||||||
|
|
|
|
|
|
|
y lnx ax; a 0,85; b 1,5; x 17,2; 17,3; 17,4; ... ; 18,5 sinb x
y |
tg(a3 x3 |
) |
; |
|
a 1,16; |
b 2,5; |
x 0,25; 0,5; |
0,75; |
... 1,75 |
||||||
|
|
|
|
|
|||||||||||
|
|
||||||||||||||
|
|
|
|
b3 x2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
1 |
|
|
|
|
|
|||||||
y |
|
bx |
|
; a 0,4; b 10,8; x 0,8; 0,9; 1; |
... ; 2 |
||||||||||
|
|
|
|
|
|
|
|||||||||
|
|
|
0,5 sin(a x) |
|
|
|
|
||||||||
|
|
|
|
b x |
|
|
|
|
|
|
|
|
|
|
|
y |
a e |
|
; |
|
|
a 1,28; |
b 0,3; |
x 12,6; 12,7; |
12,8; |
... 14 |
|||||
|
2 |
|
|
||||||||||||
|
|
|
lnx |
|
|
|
|
|
|
|
|
|
|
№19 |
y |
a2 sin(b x) |
; a 0,25; b 0,68; x 1,1; 1,3;1,5; |
...;3 |
||||||||||
|
|
|
||||||||||||
|
|
1,8 cos2(a x) |
|
|
|
|
|
|||||||
|
|
|
|
|
2 |
|
|
|
|
|
|
|
|
|
№20 |
y |
b sin x |
; |
a 1,6; |
b 1,25; |
x 0,2; |
0,4; |
0,6; ... ; |
2 |
|||||
x |
||||||||||||||
|
|
|
|
a e |
|
|
|
|
|
|
|
|
|
|
№21 |
y |
sin2 x a |
; |
a 1,8; |
b 0,34; |
x 6; |
6,1; |
6,2 ; ... 8 |
||||||
|
||||||||||||||
|
|
|
b x |
2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
115 |
|
|
|
|
№22 |
y |
a tgx2 |
|
|
|
; |
|
|
|
|
|
a 0,44; b 2,28; x 6,5; 7; |
7,5; ... 10 |
|
||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||||||
|
|
|
|
|
b 0,7x |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||
№23 |
y |
ln(a2 x) |
; |
|
|
|
a 3,2; |
b 0,45; |
x 0,6; |
0,8; 1; |
... ; |
2 |
||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
b sinx2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||
|
y |
|
a |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||
№24 |
|
bx |
; |
|
|
|
a 17,6; b 10,45; |
x 1,9; 2; |
2,1; |
... ; |
3,5 |
|
||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
2 |
|
|
|
|
||||||||||||||||||||||||||||||
|
|
1 cosx |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||
№25 |
y |
ln(a x)2 |
; |
|
a 8,24; |
x 24; 25; |
26; |
... ; |
35 |
|
||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
a |
2 |
x |
2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||
|
|
|
|
|
|
|
|
|
|
|
|
tgx |
|
|
|
|
|
|
|
|
||||||||||||||||||||||
№26 |
y |
|
|
|
|
|
|
|
|
|
a |
|
|
; a 7,32; b 0,05; x 13,3; 13,4; |
13,5; ... ; 14,5 |
|||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||
1 ln(b x) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||
|
|
1 tg(x a)2 |
|
|
|
|
x 1,25; |
|
|
|
|
|
|
3 |
||||||||||||||||||||||||||||
№27 |
y |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; |
|
a 4,1; |
b 0,96; |
1,5; 1,75; ... |
; |
|||||||||||||
|
|
|
|
|
|
|
|
b e |
x |
|
|
|
|
|
|
|||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||
№28 |
y |
|
|
|
|
|
ex ea |
|
|
|
|
; |
|
|
|
a 2; |
b 1,6; |
x 0,6; |
0,8; 1; |
...; |
2 |
|||||||||||||||||||||
|
|
|
b sinx |
2 |
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||
|
|
|
|
|
|
|
|
|
|
|
; |
|
|
|
|
|
|
|
||||||||||||||||||||||||
№29 |
y |
|
|
|
|
|
|
ax b |
|
a 1,35; b 0,98; x 7,5;8; 8,5; ... ; |
10 |
|
|
|||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||||||
|
|
|
|
lnx 3,5 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||
№30 |
y |
1 sin(b2 x2 |
) |
; a 4,3; |
b 2,5; x 5,3; |
5,4; |
5,5; |
... ; |
7 |
|||||||||||||||||||||||||||||||||
|
|
|||||||||||||||||||||||||||||||||||||||||
|
|
|||||||||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
a |
|
x 2,5 |
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
116
2.4.2. Завдання №3.2 (ітераційний цикл)
Мета:
навчитись складати блок-схеми алгоритмів циклічної структури (ітераційний цикл);
навчитись використовувати для організації ітераційних циклів оператор управління системи програмування Visual Basic 6.0 – Do…Loop;
ознайомитись з оператором Option Base 1 та функцією створення маси-
ву Array;
набути навичок виведення результатів розрахунків у вигляді таблиці у форму за допомогою оператора Print.
Теоретичні відомості.
Для виконання лабораторної роботи необхідно вивчити теоретичний матеріал, який розташований на ст. 54; ст. 56; ст. 63 – ст. 64 даних методичних вказівок. Література: [1; 2; 3]
ЗРАЗОК ВИКОНАННЯ ЗАВДАННЯ
Умова. Обчислити наближене значення суми спадного ряду
|
|
ln i 5 |
|
(c d) |
|
||||||||||
|
s(t) si t |
|
|
|
|
e |
|
|
|
|
t |
||||
|
|
i |
3 |
|
|
|
|
|
|||||||
|
i 1 |
i 1 |
|
2 |
|
|
|
|
|
|
|||||
з точністю = 10-5 та = 10-7 для |
значень параметру t1 |
t tn із кроком t, де |
|||||||||||||
c = 1.9; d = 3,2; t1 = 1,5; tn = 3,5; |
t = 0,5. |
|
|
|
|
|
|
|
|
|
|
||||
Обчислювати суму спадного ряду s(t) слід до того часу, доки величина |
|||||||||||||||
поточної відносної |
похибки розрахунку |
|
si t |
|
|
перевищує . Необхідно |
|||||||||
i |
|
|
|||||||||||||
|
|||||||||||||||
|
i > imax переривання |
|
|
|
|
|
s |
|
|
|
|||||
передбачити при |
|
обчислень |
|
на той випадок, коли |
|||||||||||
виконання умови εi < не відбувається при imax |
підсумованих членах ряду, де |
imax – максимально припустима кількість ітерацій (обмежувач числа підсумованих членів ряду). Точність розрахунків досягнута, як тільки величина εi стане менше ніж . Знайти істинну похибку розрахунку для одного значення параметра t = t1 за формулою:
|
|
|
s t1 |
,10 |
5 |
|
|
true |
|
|
|
|
|||
|
|
|
|
||||
1 s t ,10 |
7 |
||||||
|
|
|
1 |
|
|
|
|
й зробити висновок щодо точності розрахунків.
Порядок виконання завдання
I. Скласти алгоритм обчислення наближеного значення суми спадного ряду для кожного значення параметру t. Алгоритм повинен складатися із двох циклів, причому другий цикл необхідно вкласти в перший. Основна умова організації вкладених циклів: цикли не повинні перехрещуватись. Для параметру t організовуємо зовнішній арифметичний цикл (оператор For…Next). Для обчислення наближеного значення суми спадного ряду організовуємо внутрішній ітераційний цикл тому, що нам невідомо, через яку кількість
117
повторень операторів тіла циклу буде досягнута необхідна точність розрахунків εi < . Використовуємо таку форму запису оператора Do…Loop, коли спочатку здійснюється перевірка умови повторення циклу і якщо вона хибна, то цикл ні разу не виконується. Початкові дані введемо, зчитуючи їх із масиву Array.
|
|
Схема |
||
|
|
Початок |
||
|
|
Введення |
||
c, d, t1, tn, t, , imax |
||||
|
|
t t1,tn, t |
||
i = 0; s = 0; εi = 1; p = 1 |
||||
|
|
|
|
– |
|
|
εi> /p |
||
|
|
i imax |
||
|
|
+ |
|
|
|
|
i = i + 1 |
||
s |
i |
ln i 5 e (c d ) t |
||
|
i3 |
2 |
||
|
|
s = s + si |
||
|
|
|
i |
si t |
|
|
|
s |
|
|
|
|
|
|
|
|
Виведення |
||
|
|
t, s, εi, i |
||
|
|
|
|
Кінець |
. Реалізація етапу візуального програмування. |
ІІ.1. Розробити форму та її вміст. Для реалізації завдання будемо використовувати одну екранну форму. Форма повинна вміщувати: дві командні кнопки. Виведення результатів розрахунків здійснюватиметься у форму за допомогою оператора Print. Щоб знати, де виведені початкові дані, а де результати розрахунків, їх необхідно підписати, створивши до них поля написів (мітки). У вікні форми слід запрограмувати наступні об’єкти:
118
мітки Label1, Label2;
командні кнопки Command1, Command2.
ІІ.2. Для накреслених об’єктів слід змінити такі властивості: під час проектування форми обов’язково задати для Label1 та Label2 властивість
AutoSize = True, для Label1 задати Caption = « Початкові дані », для Label2
властивість Caption задаємо під час виконання програми. Інші властивості об’єктам задати самостійно.
. Приступити до етапу програмування у вхідному коді.
ІІІ.1. Два рази клацнути по кнопці<Розрахунки>. У вікні Project1–Form1 (Code) з’явиться заголовок процедури Private Sub Command1_Click() та її кінець End Sub. Після заголовку процедури набрати текст (тіло програми) (рис. 13).
ІІІ.2. Два рази клацнути по кнопці <Вихід>. У вікні Project1–Form1 (Code) з’явиться заголовок процедури Private Sub Command2_Click() та її кінець End Sub. Після заголовку процедури набрати End (рис. 13).
Рис. 13. Вікно Project-Form1 (Code)
IV. Після завершення написання кодів натиснути кнопку <Start> на панелі інструментів Standard (Стандартна). Клацнути по кнопці <Розрахунки>. З’явиться форма з результатами розрахунків (рис. 14). Переписати результати розрахунків.
119