RosettaCodeData/Task/Random-numbers/DWScript/random-numbers.dwscript
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

5 lines
122 B
Text

var values : array [0..999] of Float;
var i : Integer;
for i := values.Low to values.High do
values := RandG(1, 0.5);