Page 57 - 4450
P. 57
Приклад. Знайти суму членів ряду
x 2 x 3
S 1 .....
! 2 ! 3
Програмний код:
Private Sub Command1_Click()
s = 1: x = 1
n = 1: y = 0.1
f = 1
e = 0.001 ‘задана точність
While y >= e
For i = 1 To n
f = f * i
Next i
y = x ^ n / f
s = s + y
n = n + 1
f = 1
Wend
Label2.Caption = Str(s)
End Sub
Контрольні запитання
1. Яка відмінність ітераційного циклу від циклу з
регулярною зміною аргумента?
2. Як одержати ітераційну формулу для застосування
методу ітерацій?
3. Яка умова закінчення ітераційних обчислень?
4. Як отримати кількість виконаних ітераційних
циклів?
5. Який оператор керує виходом з циклу?
55