48306 (566506), страница 2
Текст из файла (страница 2)
2.3 Таблиця ідентифікаторів
| Змінна алгоритму | n | s | x | i |
| Ідентифікатор | n | s | x | i |
| Тип | integer | single | single | integer |
2.4 Текст програми
Sub circl_ind()
'Автор-розробник Захарченко
'виведення назви програми
MsgBox ("index")
'оголошення змінних
Dim n, i As Integer
Dim s, x As Single
'введення данних
n = InputBox("Уведiть n")
x = InputBox("Уведiть x")
s = 1 / x
'обчислення функцій
For i = 1 To n
s = s + ((-1) ^ i) * (1 / ((2 * i + 1) * (x ^ (2 * i + 1))))
Next i
'виведення результатів
MsgBox ("Значення s=" + Str(s))
End Sub
2.5 Результати роботи програми
2.6 Відносна похибка між результатами підрахунку
Висновок: за допомогою даної роботі я оволодів практичними навичками розроблення та програмування обчислювального процесу циклічної структури і навичками налагодження й тестування програм.
3. Програмування алгоритмів ітераційної структури
Мета роботи оволодіння практичними навичками розроблення та програмування обчислювального процесу ітераційної структури, поліпшення навичок налагодження і тестування програм.
Хід роботи
3.1 Постановка задачі
Розробити алгоритм та програму знаходження значень функції
| 7 |
| bx<1 bx=1 bx>1 | b=1,5 |
|
3.2 Блок-схема алгоритму
Наведено на рис. 3.1.
3.3 Таблиця ідентифікаторів
| Змінна алгоритму | b | x | Q |
|
|
|
| Ідентифікатор | b | x | Q | Xo | Xn | dx |
| Тип | single | single | single | single | single | single |
початок
Увести значення
a, b,
так
ні
так
ні
bx<1
bx=1
так
ні
Вивести значення у
так
ні
кінець
3.4 Текст програми
Sub iterac()
'Автор-розробник Захарченко
'виведення назви програми
MsgBox ("iteraciyna")
'оголошення змінних
Dim Q, x, x0, dx, xn, b As Single
'введення данних
b = CSng(InputBox("Уведiть b"))
x0 = CSng(InputBox("Уведiть x0"))
xn = CSng(InputBox("Уведiть xn"))
dx = CSng(InputBox("Уведiть dx"))
x = x0
'обчислення функцій
While x <= xn
If b * x <= 0 Then
GoTo 1
Else
If b * x < 1 Then
Q = b * x - Log(b * x) / Log(10)
Else
If b * x = 1 Then
Q = 1
Else
Q = b * x + Log(b * x) / Log(10)
End If
End If
End If
'виведення результатів
MsgBox ("Значення Q=" + Str(Q) + " x=" + Str(x))
1
x = x + dx
Wend
End Sub
3.5 Результати роботи програми
3.6 Відносна похибка між результатами підрахунку
Висновок: за допомогою даної роботи я оволодів практичними навичками розроблення та програмування обчислювального процесу ітераційної структури, поліпшив навички налагодження і тестування програм.
Висновок
Під час виконання цієї роботи я:
-
познайомився з мовою програмування Visual Basic for Application;
-
вивчив інструментальне середовище програмування Visual Basic for Application;
-
оволодів практичними навичками розроблення та програмування обчислювального процесу циклічної структури;
-
оволодів практичними навичками розроблення та програмування обчислювального процесу ітераційної структури;
поліпшила навички налагодження і тестування програм.
Список використаних літературних джерел
1. ДСТУ Б А. 2. 4 – 4 – 95. Основні вимоги до робочої документації. – К. – 1997.
2. Бухвалов А.В. и др. Финансовые вычисления для профессионалов.- СПб.: БХВ-Петербург, 2001.-320с. ил.
3. Гарнаев А.Ю. Excel, VBA, Internet в экономике и финансах.- СПб.: БХВ-Петербург, 2001.- 816с.:ил.
4. Евдокимов В.В. и др. Экономическая информатика. Учебник для вузов. Под ред. Д.э.н., проф. В.В.Евдокимова. – СПб.: Питер, 1997. – 592с.
5. Згуровський М.З., Коваленко І.І., Міхайленко В.М. Вступ до комп’ютерних інформаційних технологій: Навч.посіб. – К.: Вид-во Європ. ун-ту (фінанси, інформ. системи, менеджм. і бізнес), 2000.- 265 с.
6. Информатика. Базовый курс/ Симонович С.В. и др.- СПб.: Питер, 2000.- 640с.:ил.
7. Карлберг, Конрад. Бизнес-анализ с помощью Excel.: Пер с англ.- К.: Диалектика, 1997.- 448с.: ил.
8. Лук‘янова В.В. Комп‘ютерний аналіз даних: Посібник. – К.: Видавничий центр „Академія”, 2003. – 344с. (Альма-матер)
9.Камминг, Стив. VBA для "чайников", 3-е издание.: Пер.с англ. – М.: Издательский дом "Вильямc", 2001.— 448c.
10.А. Васильев, А. Андреев. VBA в Office 2000. C.-Пб.: Питер, 2001. – 409c.
11.Демидова Л.А., Пылькин А.Н. Программирование в среде Visual Basic for Application. М.: Телеком 2004.
12.Гетц К., Джилберт М. Программирование в Microsoft Office. К.: Издательская группа BHV, 1999.
1>1>















