Функция генерирует произвольное целое число в пределах диапазона AFrom и ATo.
Синтаксис | ||
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. |