[Reks888]

Сообщение от NitE

боже мой... где твой абстрактное мышление ? почему всегда надо всё пытатся сделать через как можно большую жопу ?

i=Rand(1,8)
select s
case i=1 : s=12
case i=2 : s=32
и т.д.
end select

гы-гы. Ты собсно делаешь через ту же жопу.
i=Rand(1,
n=i*16

Вообще зависит от того для каких целей ты будешь применять. Если тебе нужно чтобы було True если значение кратно 16, то делай i=Rand(1,12
If i mod 16 = 0 Then allisgood=True