Random, сгенерировать случайное значение из заданного списка - PascalABC.NET
Формулировка задачи:
Можно ли попросить программу рандомно выбрать значение переменной из чисел 1, 3, 7 и 9? А не 1-9.
Решение задачи: «Random, сгенерировать случайное значение из заданного списка»
textual
Листинг программы
repeat x:=1+random(9); until x in [1,3,7,9];