Page 26 - 4154
P. 26

*Код функції Excel laplas() мовою VBA для обчислення
             значення нормованої функції Лапласа:
             Function Laplas(z As Double)
             s = 0
             For x = 0 To z Step 0.0001
                 f = Exp(-(x ^ 2) / 2) * 0.0001
                 s = s + f
             Next x
             Laplas = s / Sqr(2 * 3.141592654)
             End Function








































                                          26
   21   22   23   24   25   26   27   28   29   30   31