[Mictian]

Алгоритм генерирования псевдослучайных чисел с нормальным законом распределения с нулевым математическим ожиданием и единичным среднеквадратичным отклонением.
Вначале генерируется пара независимых равномерно распределенных чисел U, V из отрезка (-1, 1). Затем, если S=U^2+V^2<1, то пара чисел Znach1:=u*sqrt(-2*ln(s)/s), Znach2:=v*sqrt(-2*ln(s)/s) являются независимыми нормально распределенными псевдослучайными числами и помещаются в массив r.

Проблема с расчетом матожидания и дисперсии, т.к. просто не знаю, как ее тут посчитать. Еще трабла с массивом. Исходник того, что есть прилагается…