Page 78 - 6845
P. 78

*Код функції 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











































                                          79
   73   74   75   76   77   78   79   80   81   82   83