RandomRange

Функция генерирует произвольное целое число в пределах диапазона AFrom и ATo. Верхняя граница диапазона не входит в перечень генерируемых значений, то есть для генерации чисел от 0 до 9 следует задавать диапазон то 0 до 10.

Синтаксис
RandomRange(AFrom: Integer; ATo: Integer): Integer
Входные параметры
Имя параметра	Тип параметра	Описание
AFrom	Integer	Нижняя граница диапазона
ATo	Integer	Верхняя граница диапазона (не входит в число генерируемых значений)
Выходные параметры
Тип параметра		Описание
Integer		Произвольное число в указанном диапазоне

Пример вызова:

Var
res, a, b: Integer;

Begin

a := 0;

b := 17;

res := RandomRange(a, b);

WriteValue('Virtual channel 99', res);

end.