2nesco
Давай добавим это дело в штатный. Типа: малой кровью -- просто еще одну опцию в свойство Modeи всего делов------------ Дoбавленo в 09.25:
2Леонид
Вполне себе солидный тест... С "ответами"
Есть два пункта:

(1-Rnd1) я писал именно для гарантий отсутствия нуля. И они после этого есть, и -- стопудовые.

свойствам Min/Max -- все-таки надо вернуть изначальный смысл. Потому, лучше, как мне представляется, так:

  FRnd:=cos(pi*_prop_Quality)*sqrt(-ln(1-_prop_Quality)/2)*(_prop_Max-_prop_Min) + (_prop_Min+_prop_Max)/2;   

типа: те же минимум и максимум, просто -- по уровню доверия 0.683 (как ты написал)------------ Дoбавленo в 09.27:
Пи, или два пи -- косинусу пофиг. Просто, первый есть встроенный, а со вторым -- суета требуется.