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
   52   53   54   55   56   57   58   59   60   61   62