Random

Функция возвращает случайное число в диапазоне от 0 до 1.

Синтаксис
Random: Extended
Выходные параметры
Тип параметра		Описание
Extended		Случайное число в диапазоне от 0 до 1

Var
res: Extended;

Begin

res := random;

WriteValue('Virtual channel 99', res);

end.

Для того, чтобы получить случайное число, в диапазоне от 0 до 10 необходимо значение функции умножить на 10:

Var
res: extended;
Begin
res := random * 10;
end.

Для того, чтобы получить на выходе только целые числа в диапазоне от 0 до 100, необходимо применить функцию div:

Var

res: extended;

Begin

res := (random * 100) div 1;

end.