Цитата:
|
Сообщение от @Rafa3L
Смотрите, коллега, в начале вы генерите рандомное число:
Код:
i := random(integer($FFFFFFF6)); до 6
а дальше смотрите, что нужно выполнить:
Код:
if i=0 and i<>1 and i<>3 and i<>4 and i<>5 then dejstvie1; if i<>0 and i=1 and i<>3 and i<>4 and i<>5 then dejstvie2; if i<>0 and i<>1 and i=3 and i<>4 and i<>5 then dejstvie3; if i<>0 and i=1 and i<>3 and i<>4 and i<>5 then i:=random(integer($FFFFFFF8)); |
У вас есть скайп или что-то в этом роде ? Суть я понял но всё-же будет на много удобнее обшятся через такие программы.