pascalabcnet/InstallerSamples/!MainFeatures/01_First/RandomDiap.pas

5 lines
202 B
ObjectPascal

// Генерация случайного числа в заданном диапазоне
begin
var i := Random(2,5);
writeln('Случайное целое в диапазоне 2..5: ',i);
end.