Содержание
Random (Max : Integer) : Integer
Случайное число.
Функция Random возвращает случайное число в диапазоне от 0 до Max-1.
Procedure OnCreate; Begin Warning('Сегодня ваш цвет '+['красный','синий','зеленый'][Random(3)]); End;