Розвязання інженерних задач мовою програмування VBA
- Категория
- Информатика
- Тип
- реферат
- Страницы
- 6 стр.
- Дата
- 30.05.2014
- Формат файла
- .html — Html-документ
- Архив
- 1029906.zip — 3.83 kb
- rozvjazannja-nzhenernix-zadach-movoju-programuvannja-vba_1029906_1.html — 12.56 Kb
- Readme_docus.me.txt — 125 Bytes
Текст работы
„
РОЗВ'ЯЗАННЯ ІНЖЕНЕРНИХ ЗАДАЧ МОВОЮ ПРОГРАМУВАННЯ VBA”
Зміст
1. Програмування алгоритмів циклічної структури із заданим числом повторень
2. Алгоритми роботи з одновимірними масивами
3. Програмування алгоритмів із структурою вкладених циклів і обробка матриць
1. Програмування алгоритмів циклічної структури із заданим числом повторень
Постановка задачі. Розробити алгоритм та програму знаходження суми
n членів ряду
/>
Виконати тестування для перевірки правильності функціонування програми для значень
n=3, x=2.
Змінна алгоритму
n
s
x
Ідентифікатор
n
s
x
Тип
integer
single
single
Текст програми:
Sub Zavdannya_5()
Dim x As Single, s As Single
Dim i As Integer, n As Integer
Dim fact As Integer
x = InputBox(«x»)
n = InputBox(«n»)
s = 0
For i = To n
s = s + ((-1) ^ n) * 1 / ((2 * n + 1) * (x ^ (2 * n + 1)))
Next i
MsgBox («сума значень» + Str(s))
End Sub
Контрольний приклад
Виконуємо обчислення для даних тестового прикладу. Результати роботи програми на екрані монітора мають виглядВиконуємо на калькуляторі підрахунки значення згідно з формулами: –0.042782738
Увести x
2
Увести n
3
Висновок: Порівнюючи результати тестового приклада обрахованого за допомогою калькулятора та комп'ютерної програми бачимо що розходження склало
– 0.042782738+0.0464286)/
0.042782738*100 = 0,0006%.Програма виконана вірно.