5 lines
96 B
Text
5 lines
96 B
Text
|
for i = 1 to 1000
|
||
|
|
a[] &= 1 + 0.5 * sqrt (-2 * logn randomf) * cos (360 * randomf)
|
||
|
|
.
|
||
|
|
print a[]
|