Код для проверки:
Код: Выделить всё
rnd string(200)
CODE
LOOP 200 times
rnd = CLIP(rnd) & RANDOM(0,1)
END
MESSAGE(rnd)
Код: Выделить всё
rnd &System.Random
CODE
rnd &= new System.Random
rndnumber = rnd.Next()
Модератор: Дед Пахом
Код: Выделить всё
rnd string(200)
CODE
LOOP 200 times
rnd = CLIP(rnd) & RANDOM(0,1)
END
MESSAGE(rnd)
Код: Выделить всё
rnd &System.Random
CODE
rnd &= new System.Random
rndnumber = rnd.Next()