Page 19 - 4192
P. 19

точність обчислення eps (наприклад, eps=0.001 або 0.000001) і
           початкові значення S=0, і=0, та P=i!=1
                Цикл починаємо з обчислення значення a і накопичення
           суми (S=S+a).

                                     Початок


                                         x



                                  S=0; I=0; P=1
                                   Eps=0.0001


                                       a=…
                                     S=S+a

                           ні                         так
                                       a<eps

                      i=i+1                            Ф=S


                       Z=i                               Ф



                      Fakt                            Кінець


                Рисунок 1.6 –  Блок –схема обчислення функції Лапласа.

                Для обчислення  і! використаємо підпрограму  Fakt (рис.
           1.7).  Потім  перевіряємо  умову  |a|<eps.  Якщо  вона  не
           виконується,  то  збільшуємо  на  одиницю  параметр  циклу  і  (
           і=і+1),   обчислюємо      Р=P *i,   використовуючи     те,   що

                                              18
   14   15   16   17   18   19   20   21   22   23   24