[NitE]

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

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